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Atari Joysticks 




Turn your Apple into the world's 
most versatile personal computer. 



The SoftCard™ Solution. SoftCard 
turns your Apple into two computers. 
A Z-80 and a 6502. By adding a Z-80 
microprocessor and CP/M to your 
Apple, SoftCard turns your Apple into 
a CP/M based machine. That means 
you can access the single largest body 
of microcomputer software in exist- 
ence. Two computers in one. And, the 
advantages of both. 

Plug and go. The SoftCard system 
starts with a Z-80 based circuit card. 
Just plug it into any slot (except 0) of 
your Apple. No modifications required. 
SoftCard supports most of your Apple 
peripherals, and, in 6502-mode, your 
Apple is still your Apple. 

CP/M for your Apple. You get CP/M 
on disk with the SoftCard package. It's 
a powerful and simple-to-use operating 
system. It supports more software 
than any other microcomputer operat- 
ing system. And that's the key to the 
versatility of the SoftCard/Apple. 



BASIC included. A powerful tool, 
BASIC-80 is included in the SoftCard 
package. Running under CP/M, ANSI 
Standard BASIC-80 is the most 
powerful microcomputer BASIC 
available. It includes extensive disk I/O 
statements, error trapping, integer 
variables. 16-digit precision, exten- 
sive EDIT commands and string func- 
tions, high and low-res Apple graphics, 
PRINT USING, CHAIN and COM- 
MON, plus many additional com- 
mands. And, it's a BASIC you can 
compile with Microsoft's BASIC 
Compiler. 

More languages. With SoftCard and 
CP/M, you can add Microsoft's ANSI 
Standard COBOL, and FORTRAN, or 



Basic Compiler and Assembly Lan- 
guage Development System. All, more 
powerful tools for your Apple. 
Seeing is believing. See the SoftCard 
in operation at your Microsoft or Apple 
dealer. We think you'll agree that the 
SoftCard turns your Apple into the 
world's most versatile personal 
computer. 

Complete information? It's at your 
dealer's now. Or, we'll send it to you 
and include a dealer list. Write us. Call 
us. 

SoftCard is a trademark of Microsoft. Apple II and 
Apple II Plus are registered trademarks of Apple 
Computer. Z-80 is a registered trademark ot Zilog. 
Inc. CP/M is a registered trademark ol Digital 
Research, Inc. 
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Microsoft Consumer Products, 400 108th Ave. N.E., 
Bellevue. WA 98004. (206) 454-1315 



ADVENTURE has gone GOLD! 



AND WE 
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us.* 



The 12 Scott Adams' Adventures are presented in our Limited Gold Edition. Each tape and disk is in- 
dividually numbered, and guaranteed until July 10th, 2001. Each package contains a certificate of 
authenticity, a registration card and an autographed, (rather interesting) photo of the author. 
The 12 Adventures normally retail for $239.40 individually on tape and $159.80 for 4 triple-pack disks. 

The Limited Gold Edition is yours . . . forever 
... for $100.00 tape or disk, value for value. 
To Order: The Limited Gold Edition is available 
in very limited quantity, from interested Soft- 
" a re Retailers. Ask your local dealer. If he does 
'eThe Limited Gold Edition . . . Then call 
ree 1-800-421-5770. In California 
1 -800-262-4242 (LocaP 

will direct you to a dealer who doe"o I'lWU Ihe 1 
Limited Gold Edition. Supply Is Limited! 
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The Limited 
Gold Edition 

is available in 
the following 
different 
configurations. 
• Apple 2 Disk 



package 
» Atari Tape 
* tari Disk 
IS-80 Tape 

30.00 Each 
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keepini 
.000.00 in Gold Coins is" 1 
Limited Gold Edition. Its ' 



Limited Gold Editio.. 

distributed exclusively . 

8295 SO. LA CIENEGA BLVD. • INGLEWOOD, CA 90301 








NSTANT80 COLUMN APPLE 

The miracle of the 80's... everything you want in an 80-column card. 



STOP STARING AT 40 COLUMNS 

WIZARD -80 lets you see exactly what you will get 

when typing 80-column 

format It gives you a 

full80-colurrr ' 

24-line disp' 

with all tries 

features. 
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■ Fully compatible with Apple II® and Apple II Plus 

■ Fully compatible with most word processors, 
micro-modems and prom programmers, plus all 
current Apple II expansion boards 

■ Lists BASIC programs, integer and Applesoft 

■ Fully compatible with Pascal 

■ Uses software to switch between 40 and 80 
column formats 

■ Displays 7X9 matrix characters 

■ Provides upper/lower case characters with full 
descenders 

■ Fully edits. ..uses ESCape key for cursor 
movement 

■ Scrolling stop/start uses standard Control-S entry 

■ Retains text on screen while it is being printed 

■ Contains crystal clock for flicker-free character 
display 

■ Has low power consumption for co 
' le operation 

ads-soldered directly to boaFd 
[..maximum reliability 

■ 2K on-board RAM, 50 or 
60 Hz operation 

Inverse video selection 
idard 
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VOUR INSTANT 
JiO-COLUMN APPLE 

It fs the Miracle of ' " 

STOP MARINO AT 40 COLUMNS. , .. 

When typing no-column format. It gw 
with all these features: fully compatl 
romp,i ti Id e with most word processors, 

"i Apple II expansion boards, i' 

Fully compatible with Pascal. Uses 
formats. Oisplays 7Xt matrix charact 
Kith fill! descenders, hilly edits, us* 
stop/stari uses standard Control -'j 8 
printed. Contains crystal clock ff 
consumption fir cool reliable oper? 
board for maximum reliability. ZK 
for a light pen. Inverse video S 
g| u n fine Computer Stores, 
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•Registered trademarks 
of Apple Computer Inc. 



AVAILABLE AT ALL FINE 
COMPUTER STORES 

ESPEH HliKIHI 
Systems 

SUBSIDIARY OF WESPERCORP 

14321 New Myford Road 
Tustin, California 92680 



•J 



NO. 43 



DECEMBER 1981 



STAFF 

Editor/Publisher 
ROBERT M. TRIPP 

Associate Publisher 
MARY GRACE SMITH 

Associate Editors 
MARY ANN CURTIS 
FORD CAVALLARI 

Special Projects Editor 
MARJORIE MORSE 

Production Coordinator 
PAULA M. KRAMER 

Typesetting 

EMMALYN H. BENTLEY 

Advertising Manager 
CATHI BLAND 

Circulation Manager 
CAROL A. STARK 

Dealer Orders 
LINDA HENSDILL 

MICRO Specialists 
APPLE: FORD CAVALLARI 
PET: LOREN WRIGHT 
OSI: PAULGEFFEN 

Comptroller 
DONNA M. TRIPP 

Bookkeeper 
KAY COLLINS 



Advertising 

Sales Representative 

KEVIN B. RUSHALKO 

603/547-2970 



DEPARTMENTS 

5 Editorial 

6 New Publications 
31 Letterbox 

35 PET Vet 

38 Microbes and Updates 

43 From Here to Atari 

79 Short Subjects 
112 Software Catalog 
117 Hardware Catalog 
119 6502 Bibliography 

127 Advertiser's Index 

128 Next Month in MICRO 




THE 6502/6809 JOURNAL 



HARDWARE 

g Data Collection with Your Micro 



Interface allows high-speed sampling and recording 



John C. Traeger 



14 
21 
27 



PET "Listener" Louis F. Sander and Victor H. Pitre 

Listen to your PET tapes and have a CB2 sound amplifier 



Watch that Ground Connection 

Protect your computer with a properly connected ground 



Raymond Weisling 



Proportional Joystick for Atari Mike Dougherty 

Make your own joystick for five dollars 



PROGRAMMING AIDS 
49 



53 



Some Help for KIM, Part 2 

Investigation of the single step feature 

OSI Symbolic Disassembler 

Popular disassembler adapted for C4P 



Wayne D. Smith 



David E. Pitts 



PROGRAMMING LANGUAGE 



57 
64 

68 
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A look at the Apple Pascal Filer 
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Features to give you powerful program structures 
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*-' , ~' Use this lister with any program, anywhere in memory 
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DATAMOST 

19273 Kenya St.. Northridge. CA 91326. (213) 366-7160 



It seemed like a cinch assign- 
ment. At least for the galaxy's 
master thief. 

Just sneak inside the Star- 
Complex Base, dodge a few 
guardian robots and grab the 
formula. A piece of cake. 

Oh yeah! They didn't say the 
robots went berserk at the sight of a 
human. They didn't say I'd have to 
laser my way through 7 levels. Or, 
that rampaging robots would keep 
coming and coming. 

And most of all, they didnlt 
bother to say there's some weird 
blob, an unearthly something that 
tracks you right thru the damn 
walls. 

I made it to the 7th level. I found 
the formula. But, more robots are 
massing out there. And I'm 
wounded. My energy charge is low. 

You. Yes, you. How good a Thief 
are you? Prove yourself. Come get 
me. Come save me. 

$29.95 for Apple II*. At computer 
stores, or from DATAMOST. 

MSA/NWSTERCHARGE accepted. *1.00 shipping/ 
handling charge. (CA residents add 6% tax) 

'Apple II is a trademark of Apple Computer. Inc. 
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At first glance our cover looks "tradi- 
tional" for this time of year. Actually, 
we have broken our own tradition of 
using a color photo and monochrome 
computer graphic overlay. This month's 
cover photo depicts winter in the Berk- 
shire Mountains of Massachusetts. 

The graphic overlay was created 
using a I'ET and the programmable 
character feature of the CBM 4022 
printer. The colors were stripped in by 
Gilbert Color Labs of Hudson, New 
Hampshire. 

(Cover Photo by lohn Rodriguezl 
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New Product Review Policy 

As you may be aware, MICRO has not 
published product reviews for several 
months. Previously, MICRO handled 
reviews with MICROScope. This sys- 
tem involved receiving a product, select- 
ing a qualified reviewer, sending the 
reviewer the product, preparing the 
review, sending a copy to the manufac- 
turer, and again contacting the reviewer. 
By the time the review finally appeared 
in the magazine, six months might have 
elapsed from our initial receipt of the 
product. This ended up being unsatis- 
factory for both the manufacturer and 
for the readers. Furthermore, many 
competitive products weren't covered, 
and we had trouble reviewing all the 
products received. As a result of the 
long delays and the inherent bias, we 
stopped publishing reviews altogether. 

We do realize that both manu- 
facturers and readers want reviews, even 
if they don't meet such high standards 
of impartiality as we had intended 
with MICROScope. As a result, we are 
changing and relaxing our review policy. 

Reviews will be considerably 
shorter than MICROScopes tended to 
be (probably a half column) and will 
contain material that is primarily 
evaluative rather than descriptive in 
nature. (You can get the details by 
reading the manufacturer's promotional 
literature, advertisements, entries in 
our Hardware and Software Catalogs, 
or by listening to the salesman.) After 
you have that information, you need 
advice from a knowledgeable person on 
whether to buy the product. Our 
reviewers will tell you the answers to 
such vital questions as: 

Does it work? 
Is it well documented? 
What won't it do? 
Is it "user-friendly"? 
Do I need a degree in computer science 
to use it? 



We are still in the process of 
assembling our review panel, so it will 
be a few months before any reviews ap- 
pear in the magazine. In the meantime, 
we think it is important to let both the 



manufacturers and the readers know 
that we are not ignoring this very im- 
portant area of service. 

Coming Changes 

Next month, to start the year off 
right, we'll introduce some changes in 
MICRO. 



A better quality of printing and 
more use of color within the magazine 
will be two obvious enhancements. In- 
stead of the current binding where the 
pages are glued together (called 
"Perfect"), we will change back to the 
form with the staples (called "Saddle- 
stitch"). This makes it easier for the 
magazine to lie flat while you are enter- 
ing a program. Also, the magazine will 
no longer have the holes for three-ring 
binders. We expect a few complaints 
about this, but the magazine has grown 
so in size that now it is difficult to col- 
lect more than four issues in a standard 
binder. Furthermore, hole punching is 
an extra step, which has several times 
significantly delayed our shipping. 

MICRO will no longer be sent to 
subscribers in envelopes. Instead, the 
mailing label will be pasted directly on- 
to the cover of the magazine. Stuffing 
envelopes, too, has delayed mailings, 
and we suspect that the post office may 
not have recognized the envelopes as 
magazines, denying them the high 
priority they deserve. (To increase 
durability, we are increasing the weight 
of the cover. At the same time we are 
decreasing the weight of the paper in- 
side, so that the overall weight will not 
change significantly.) 



We expect these changes will get 
your MICRO to you sooner in an even 
more useful form, while helping to 
keep costs as low as possible. 
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New Publications 



Mike Rowe 
New Publications 
34 Chelmsford Street 
P.O. Box 6502 
Chelmsford, MA 01824 

Games 

PET Games and Recreations by Mac 

Oglesby, Len Lindsay, and Dorothy 
Kunkin. Reston Publishing Company, 
Inc. (Reston, Virginia), 1981, vii, 245 
pages, diagrams, drawings, listings, 7 x 
9 inches, paperbound. 
ISBN: 0-8359-5530-3 
ISBN:0-8359-5529-X|pbk.) $12.95 

This collection of games, designed to 
entertain and educate, is suitable for 
both beginning programmers and com- 
puter veterans. Each game is accom- 
panied by a brief summary, including 



instructions, background information, 
and level of strategy. 

CONTENTS: How To Use This Book for 
Fun and Learning— The Games; The Game 
Write-ups; The Listings; BASIC for Begin- 
ners; Special Guest Lectures; Games 
Bibliography. Plan-Ahead Games— Qwert; 
Capture; Tic Tac Toe; Reverse; Watch- 
person; Square; Motie; Sinners; Brainbuster. 
Games of Deductive Reasoning— Stars; But- 
ton, Button; Hurkle; Martian Hunt; The 
Code Game; Dr. Factor. Games of Chance- 
In Between (Acey Deuccyl; Thrice Dice. 
Language and Counting Skills Games— How 
Many?; Crossword Puzzle (Puzzlebox, Puzzle 
Entry); Wordsearch— A Hunt for Hidden 
Words. Recreations— Bouncing Ball Track 
Ways,- Hypername, Nameblinker, Namerun- 
ner; Happy Birthday; Starfill; Marblestat; 
Petskctch. Special Guest Lectures. Games 
Bibliography. 

Inside BASIC Games by Richard Mateo- 

sian. Sybex Inc. (2344 Sixth St., 

Berkeley, California 94710). 1981, xx, 

325 pages, illustrations, 7x9 inches, 

paperbound. 

ISBN: 0-89588-055-5 $14.95 

In this book, the author uses eight dif- 
ferent kinds of computer games to teach 



interactive programming in BASIC. The 
book is written for people interested in 
designing original games programs. 



CONTENTS: Arithmetic Games— Addition 
Drill; The Addition Drill ProgTam; Arith- 
metic Drill; The Arithmetic Drill Program; 
Possible Additions and Changes; Summary. 
Guessing Games— General Form of Guessing 
Games; Four; A Sample Game; The Guessing 
Game Program; The Hangman Program; 
Possible Additions and Changes; Summary. 
Time Games— The Pet Clock; Clock; The 
Clock Program; Card Memory; The Card 
Memory Program; Ten-Key Flicker; Timer; 
Summary. Date Games— Birthday; The Birth- 
day Program; Calendar; The Calendar Pro- 
gram; Summary. Taxman— Instructions for 
Taxman; The Taxman Program; Suggestions 
for Improvements and Additions; Summary. 
Programming with Free BASIC— Program 
Design Techniques; Free BASIC; Translating 
from Free BASIC into BASIC; Free BASIC, 
Structured Programming and Pascal; Sum- 
mary. The Match-Up Game— The Game- 
Building Phase; The Playing Phase; The 
Match-up Program; Changes and Improve- 
ments; Summary. Craps— Instructions for 
Craps; The Craps Program; Suggested Addi- 
tions and Improvements; Summary. Alien 
Life— Alien Encounter; The Rules of Game of 
Life; The Alien Life Program; Improvements 
and Additions; Summary. Appendix A. Index. 

JUCRO 
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'Apple II is a trademark ot Apple Computer. Inc. 



VISA/MASTERCHARGE accepted. CI. 00 shipping/ _ . ,-. 

handling cnarge. (Calit. residents add 6% tax| (213) 366-7160 



Try one game and you're 
caught in its irresistable web of 
fun. More habit forming than 
peanuts. More fun than gorging 
on hot fudge sundaes. More ex- 
citing than anything like it. 

SNACK ATTACK won't just 
a-maze you, it'll 3-maze you! Win 
the first level, and up pops a new, 
faster version, with a more in- 
tricate maze. And for more 
challenge there are doors you can 
enter and they can't. Doors they 
can dash thru and you can't. 

SNACK ATTACK ... by Dan 
lllowsky, the game that defies 
anyone to stop after just one 
game! 

$29.95, for Apple II* 

At computer stores, or from: 

DATAMOST 

19273 Kenya St. 
Northridge, CA 91326 
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UAL RAM POWER 



RAM PLUS + 

From Mountain Computer 



Compatible with Apple® Language Card 

16K RAM Provided 

Additional 16K RAM Chips Available, 
utilized by user-generated software. 

No Chip to Pull 

No Cables to Attach 

Works in our Expansion Chassis™ 
See your Apple® dealer or 

contact us for information. 
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%om SYNERGISTIC SOFTWARE 







ADVENTURE GAME 

ODYSSEY: 

THE COMPLEAT APVENTURE 

NOW AVAILABLE IN APPLESOFTor INTEGER 

A mythic adventure game utilizing the Apple's colorful 
high-res graphics. The adventure is set in the Sargalo Sea. a 
haunted realm of sea serpents, dragons, and fabulous beasts. 
Many islands provide an endless variety of hazards and foes as 
you explore villages, castles, and dungeons. You walk, ride, sail 
and fly across detailed jungles , swamps , mountains and seas . At 
every step you decide the actions to be taken and your party's 
nature. You will collect magical devices, gather an army and set 
out on a quest to attack the powerful fortress on Lapour. Always 
challenging and uniquely different each time you play. 

Requires 48K, disk with DOS 3.3, Applesoft or Integer. 
$30.00 





ARCADE NEW GAME 

ESCAPE FROM ARCTURUS 

A fast action dual mode high-res arcade style game with 
excellent color graphics and sound effects. In command of the 
Space Fortress you fend off powerful attackers from all sides. 
The attacking Griplems use several different ships, force fields 
and weapons in ever increasing numbers and speed. Once you 
take charge of the Arcturon ESCAPE ships you must battle a 
variety of invading Griplem landing craft. Control your ship with 
paddle or joystick while trying to ESCAPE into hyperspace. 
Provides more variety, challenge and choices than other arcade 
games. 

Full Color - High Speed - Machine Language 

Requires 48K, disk with DOS 3.3, Applesoft and paddles. 
$35.00 




EDUCATIONAL NEW SOFTWARE 

THE PLANETARY GUIDE 

This colorful high-resolution handbook puts the solar system at 
your fingertips. The Planetary Guide is a new and exciting way to 
learn astronomy as you follow the program from the moon and 
sun, to the planets and their orbits, to comets and asteroids. All 
major solar system members are displayed in detail. Moon 
phases and planetary movement are animated on high-res 
screens. Pick your date and see the location of all planets in orbit 
as well as where each planet is listed in each constellation. 
Graphic displays along with text data and detailed tables provide 
as well as where each planet appears in each constellation 
keystroke commands allow rapid access to any of the general 
purpose or detailed programs. 

Great with The Star Gazer's Guide. 

Requires 48K disk with DOS 3.3, Applesoft 
$30.00 



Synergistic 
Software 



5221 120th Ave. S.E. 
Bellevue, WA 98006 
206-226-3216 



All programs require Apple II or Apple II Plus. See 
your dealer for these and other fine Synergistic 
Software products or order directly. 



Apple II and Applesoft are trademarks of Apple Computer, Inc. 
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This article describes how to 
construct and implement an 
interface which enables high- 
speed sampling and recording of 
experimental data. Written for 
an AIM 65, it is readily adapted 
to any 6502 microprocessor 
with either a 6520 or 6522 
interface adapter. 



John C. Traeger 

Dept. of Physical Chemistry 

La Trobe University 

Bundoora, Victoria 3083 

Australia 



One application for which the 
microprocessor is ideally suited is the 
rapid measurement of experimental 
data. This article describes how an AIM 
65, with the aid of an inexpensive (less 
than $50) and relatively simple inter- 
face, can be made to function as a high- 
speed recorder. The interface and oper- 
ating program can be readily adapted for 
use on other 6502 systems. 

The basic interface consists of a 
10-bit analog-to-digital converter (ADC) 
which is connected to the AIM 65 via 
the user-dedicated 6522 Versatile Inter- 
face Adapter. To simplify design, an 
Analog Devices AD571 converter is used 
to digitize the signal voltage to a relative 
accuracy of 0.1%. This device is a suc- 
cessive approximation ADC consisting 
of a 10-bit digital-analog converter, 
voltage reference, clock, comparator, 
successive approximation register and 
output buffers all contained on a single 
chip. For less critical applications, a 
cheaper version with only 0.4% 
guaranteed accuracy (AD570) could be 
employed. Both converters have a 
typical conversion time of 25 n sec. 



Digital Interface 

The complete circuit for interfacing 
to the AIM 65 Application connector (Jl) 
is shown in figure 1. Data transfer be- 
tween the ADC and the microprocessor 
is via the two data ports of the 6522: 
PA0-PA7 and PB1-PB2 are used for the 
10 data bits, with PB7 being used to 
monitor the DATA READY (end of con- 
version) status line of the AD571. The 
remaining unused bits of port B are held 
at logic to reduce software overhead 
time. 

Initiation of a conversion is triggered 
by a positive pulse on the BLANK and 
CONVERT line of the AD571. Because 
the pulse width must be greater than 2 
\x sec, this is best accomplished under 
program control using the CA2 control 
line of the 6522 in the manual mode to 
generate a 6 \i sec- wide positive pulse. 
The two CB control lines can be used to 
synchronize the timing of the data 
acquisition with the signal to be 
measured. 

Analog Interface 

The input voltage levels and 
polarities to the AD571 are determined 
by the bipolar offset control pin. A 
unipolar to + 10V range is obtained if 
this pin is shorted to digital common, 
and a bipolar +5V range with offset 
binary output code results if the pin is 
left open. Because the AD571 has a 
relatively low input resistance (5 
Kohms), it is necessary to buffer the 
analog input. Although the present cir- 
cuit has achieved this by using an 
LM308 operational amplifier on the in- 
put in a voltage follower configuration, 
it is possible to include a variable gain 
option. The 15 Q resistor in series with 
the analog input to the AD571 gives a 
typical full scale calibration error of 
± 0.2%. For a more precise calibration it 
is necessary to replace this with a 50 Q 
trimmer. In addition to the + 5V supply 



used for the AIM 65, a ± 15V power sup- 
ply is required for operation of the 
LM308 and AD571. (A ± 12V supply 
could be satisfactorily used.) To 
minimize the effects of noise and inter- 
ference, each power-supply line is 
bypassed to ground right at the con- 
verter with a 4.7 ^ F tantalum capacitor. 

The maximum signal frequency that 
can be handled with less than 1 least 
significant bit (LSB) error due to timing 
is given by 



'max =2~ n /2nT c 



where n is the number of bits and Tc is 
the conversion time. Thus, for the 
AD571 connected as shown in figure 1, 
it is only possible to measure signals 
with frequencies of 6 Hz or less to an ac- 
curacy of 0.1%. An increase in the fre- 
quency response can only be achieved at 
the expense of overall accuracy. The 
reason for this poor frequency response 
is that the input voltage to a successive 
approximation ADC must remain con- 
stant to within 1 LSB during the conver- 
sion process (25 H|sec for the AD571). 

It is possible to greatly increase the 
frequency response by incorporating a 
sample and hold amplifier (SHA) in 
place of the buffer amplifier. This 
enables a constant input to the ADC to 
be maintained during a conversion 
which represents the analog signal as of 
a certain precisely known time. The 
ultimate limitation on timing accuracy 
is the aperture jitter or uncertainty of 
the SHA. 

When a SHA is used with an ADC, 
the timing uncertainty of the conversion 
process is reduced by the ratio of aper- 
ture jitter, Ta, to the conversion time 
(i.e. Ta replaces T c in equation 1). For 
example, if an Analog Devices AD528 
SHA, which has an aperture uncertainty 
of 15 nsec, is used in conjunction with 
the AD571, the maximum frequency 
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signal that can be digitized to 1LSB error 
is 10 kHz. However, in order to faithful- 
ly reproduce a signal, it is necessary to 
sample it at a rate which is at least twice 
the highest frequency. Thus, for a 10 
kHz signal, the microcomputer must be 
capable of acquiring data in less than 50 
\i sec. This is about the limit at which 
10-bit data can be collected with a 
1MHz 6502 microprocessor. 

Many natural phenomena have an 
exponential, rather than an oscillatory, 
nature. For example, the discharging of a 
capacitor, various chemical reactions, 
and the decay of radioactive isotopes all 
follow an exponential relationship. 
These processes are characterized by a 
particular parameter called the half-life, 
which is the time taken for the initial 
quantity to be reduced by 50%. The 
fastest exponential decay that can be 
followed digitally with less than 1LSB 
error is given by 

T, /2 min = 0.6931 T c 2 n 

where n is the number of bits of preci- 
sion and Tc is the conversion time of the 
ADC (or the aperture uncertainty if a 
SHA is used on the input). The AD571 
as shown in figure 1 is capable of ac- 
curately following processes with a half- 
life of only 18 msec. 



Figure 1 



!» » 

•* DATACQ * 



.» 

t 

.» 




BY J.C. TRAEGER • 



i COLLECTS DATA FROM AH AD571 ANAL0G-T0- 

;DIGITAL CONVERTER INTERFACED TO AN AIM 65 

;VIA THE USER 6522 VIA. ALL DATA IS 

; STORED IN MEMORY FOR SUBSEQUENT PROCESSING 

;BY THE BASIC PROGRAM. THE TIME INTERVAL 

; BETWEEN SUCCESSIVE POINTS IN UNITS OF 

;0.01 SEC. IS PASSED TO THE PROGRAM VIA 

;THE USR ARGUMENT AS AN INTEGER BETWEEN 1 AND 255 



CTR 


EPZ SA9 


BUFFL0 


EPZ $AA 


BUFFHI 


EPZ SAB 


MSEC 10 


EPZ SAD 


NC0NV 


EPZ SAE 


DATL0 


EQU S0F80 


DATHI 


EQU DA0A 


[6522 


REGISTER DI 


IRB 


EQU SA000 


IRA 


EQU SA001 


T1CL 


EQU $A004 


T1CH 


EQU SA005 


ACR 


EQU SAOOB 


PCR 


EQU SAOOC 


IFR 


EQU SAOOD 


IFIX 


EQU SBEFE 


' 


ORG $F00 




OBJ $800 



;C0UNTER FOR NO. OF 0.01 SEC INTERV. 
;L0W ORDER BYTE OF ADC BUFFER 
;HIGH ORDER BYTE OF ADC BUFFER 
;L0W ORDER BYTE OF USR ARGUMENT 
; CONVERSION COUNT BUFFER 



; START ADDR. 
; START ADDR. 



FOR LOW BYTE OF DATA 
FOR HIGH BYTE OF DATA 



INPUT REGISTER B 

INPUT REGISTER A 

TIMER1 LOW ORDER COUNTER 

TIMER1 HIGH ORDER COUNTER 

AUXILLIARY CONTROL REGISTER 

PERIPHERAL CONTROL REGISTER 

INTERRUPT FLAG REGISTER 

; INTEGER CONV.— BASIS SUBR. 



Software 

The sample program shown here 
demonstrates the ability of the AIM 65 
to follow fast reactions. For conve- 
nience, a minimum time interval of 10 
msec, between data points has been 
chosen with a total of 50 points. It is a 
simple process to modify the program to 
accommodate more or less data points. 
The program enables reactions with a 
half-life between 0.1 sec. and 25 sec. to 
be satisfactorily followed. 

Because of the speed with which 
data is collected, and for accurate con- 
trol of the interval timing, the data ac- 
quisition section has been written as an 
assembly code subprogram (DATACQ). 
This places the data directly into 
memory for subsequent processing by 
the main BASIC program. The sub- 
program occupies less than 256 bytes, 
including data storage. The time inter- 
val, in units of 0.01 sec, is passed to 
DATACQ as an 8-bit integer (MSEC10). 
It is necessary to ensure that the USR 
argument is between 1 and 255 as no 
check is made within DATACQ. The 
page zero locations used by DATACQ 
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OFOO 20FEBE 


DATACO. 


JSR 


IFIX 


•GET THE USR ARGUMENT INTO $AD 


OF03 A940 




LDA 


#$40 


;SET UP FOR A MAXIMUM OF 


0F05 85AE 




STA 


NCONV 


; 64 CONVERSIONS/POINT 


OF07 A5AD 




LDA 


MSEC 10 




OF09 C5AE 




CMP 


NCONV 


;MORE THAN 0.63 SEC. /POINT? 


OFOB B004 




BCS 


START 


;YES, LEAVE NCONV-64 


OFOD 6901 




ADC 


#$01 


;N0, SET NCONV TO MSEC10+1 TO 


OFOF 85AE 




STA 


NCONV 


; ENSURE NO SLEWING ERROR 


OFU 


; 








0F11 A2DD 


START 


LDX #$DD 


;GET READY TO START 


0F13 A940 




LDA 


#$40 


;SET TIMER. T1 FOR 


0F15 8D0BA0 




STA 


ACR 


; CONTINUOUS OPERATION 


0F18 A910 




LDA 


#$10 


;LOAD T1CL 


0F1A 8D04A0 




STA 


T1CL 




0F1D A927 




LDA 


#$27 


;LOAD T1CH AND START THE 


0F1F 8D05A0 




STA 


T1CH 


; CLOCK AT 10 MSEC RATE 


0F22 


j START 


THE 


EXPERIMENT 


USING CB2 


0F22 8EOCA0 




STX 


PCR 


;SET B/C AND CB2 LOW 


OF25 A200 




LDX 


#$00 


j INITIALIZE DATA ARRAY POINTER 


0F27 A4AE 


iOOP1 


LDY 


NCONV 


;SET UP NO. OF ADC'S/POINT 


0F29 A5AD 




LDA 


MSEC 10 


;GET NO. OF 0.01 SECS. AND 


0F2B 85A9 




STA 


CTR 


; SET UP LOOP COUNTER 


0F2D A900 




LDA 


#$00 




0F2F 85AA 




STA 


BUFFLO 


; CLEAR ADC BUFFER 


0F31 85AB 




STA 


BUFFHI 




0F33 9D800F 




STA 


DATLO.X 


; AND CURRENT DATA POINT 


OF36 9D0ADA 




STA 


DATHI.X 




OF39 A9FF 


L00P2 


LDA 


#$FF 


; RESET B/C AND CB2 HIGH 


0F3B 8D0CA0 




STA 


PCR 




0F3E A9FD 




LDA 


#$FD 


;B/C LOW STARTS CONVERSION 


0F4O 8D0CA0 




STA 


PCR 




0F43 18 




CLC 






0F44 A5AA 




LDA 


BUFFLO 


;GET LOW BYTE OF ADC BUFFER 


0F46 7D800F 




ADC 


DATLO.X 


;AND ADD TO CURRENT DATA POINT 


OF49 9D800F 




STA 


DATLO.X 




0F4C A5AB 




LDA 


BUFFHI 


;GET HIGH BYTE OF ADC BUFFER 


0F4E 7D0ADA 




ADC 


DATHI.X 


; AND ADD TO CURRENT DATA POINT 


0F51 9D0ADA 




STA 


DATHI.X 




OF54 ADOOAO 


WAIT 


LDA 


IRB 


;IS THE CONVERSION DONE? 


OF57 30FB 




BMI 


WAIT 


;N0, GO CHECK AGAIN 


OF59 85AB 




STA 


BUFFHI 


;YES, STORE HIGH BYTE IN BUFFER 


0F5B AD01A0 




LDA 


IRA 


;GET LOW ORDER BITS AND 


0F5E 85AA 




STA 


BUFFLO 


; STORE LOW BYTE IN BUFFER 


0F6O 88 




DEY 






0F61 10D6 




BPL 


L00P2 


;IF MORE READINGS, RESTART THE ADC. 


0F63 E8 




INX 




;N0, UPDATE DATA POINTER 


0F64 2C0DA0 


TWA IT 


BIT 


IFR 


;10 MSEC INTERVAL UP YET? 


0F67 50FB 




BVC 


TWAIT 


;N0, WAIT FOR TIMER FLAG 


0F69 2C04A0 




BIT 


T1CL 


;YES, CLEAR TIMER FLAG 


0F6C C6A9 




DEC 


CTR 


;END OF TIME ON THIS POINT? 


0F6E D0F4 




BNE 


TWAIT 


;N0, WAIT SOME MORE 


0F70 E032 




CPX 


#$32 


;YES, ALL 50 POINTS DONE? 


0F72 D0B3 




BNE 


L00P1 


;N0, GET NEXT DATA POINT 


0F74 60 




RTS 
END 




;YES, RETURN TO BASIC 



are those of the floating point ac- 
cumulator, and as such, have no effect 
on the operation of BASIC. 



The number of analog-to-digital con- 
versions at each point (NCONV) is a 
variable depending on the time interval. 
In order to avoid any slewing error, 
NCONV is set to MSEC 10 + 1, up to a 
maximum of 64, which is the largest 
number of successive 10-bit conversions 
that can be added together (digital 
smoothing) without any overflow of the 
16-bit data storage format. This ar- 
bitrary process ensures 10-bit accuracy 
for all exponential reactions which are 
followed to 99% completion. All data 
recording is done in the first 10 msecs. 
with each conversion and its associated 
processing taking less than 60 M sec. To 
speed up throughput, part of the data 
processing is done during the AD571 
conversion time so that it is necessary to 
perform a dummy conversion to obtain 
the final reading at each point. 

MICRO 



100 


REM DEMONSTRATION PROGRAM 


FOR USE 


WITH 


SUBROUTINE DATACQ 


110 


DIM X(50) 








120 


INPUT "TIME/POINT IN UNITS 


OF 0.01 S 


";T 




130 


PRINT " " 








140 


IF T < 1 OR T > 255 THEN STOP 






150 


POKE 4,0: POKE 5,15 








170 


I - USR (T) 








180 


AL - 3968 








190 


REM START ADDRESS FOR LOW 


BYTE OF 


DATA 


($0F80) 


200 


AH - 4032 








210 


REM START ADDRESS FOR HIGH BYTE OF 


DATA ($OFCO) 


220 


FOR I - 1 TO 50 








230 


J - AL + I - 1 








240 K - AH ♦ I - 1 








250 X(I) - PEEK (J) * PEEK (K 


• 256 






260 


NEXT I 








270 


FOR I - 1 TO 50 STEP 2 








280 


PRINT X(I),X(I + 1) 








290 


NEXT I 








300 


PRINT " " 








310 


GOTO 120 








320 


END 









BUY! SELL! TRADE 

COMPUTER & HAM EQUIPMENT 

Q COMPUTER* 
TRADER 



Mailed 1st class, 1st and 15th of every month 
SEND ADS FIVE DAYS BEFORE MAILING DATE 



— RATES — 
Subscriptions Ads 



One Year $10.00 

Six Months $6.00 

Per Copy SI. 00 

Foreign (Ait Mail) $25.00 yr. 



Hobby 20' Word/Number 

Business .55* Word/Number 

(Non-Subscriber Add 15* 

Word/Number} 



Send Ads and Subscriptions with remntance to 

COMPUTER TRADER® 

Chet Lambert, W4WDR 

1704 Sam Drive • Birmingham, AL 35235 

(205) 854-0271 



For ads count name and address, words and numbers 

(zip/area code tree) 

Please Include your name, address, call sign or phone number 
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Lazer isn't afraid to compare! 

(because we have the best lower case system available.) 

Despite the fact that we were one of the first manufacturers to produce lower case equipment for the Apple II. Lazer 
Microsystems products are still the state-of-the-art. Beside the obvious price/performance advantage we have over the 
competition, our products are expandable. Lazer is constantly introducting new products including our Lower Case + Plus 
II, Character Set + Plus (that adds 2 additional character sets to the Lower Case + Plus), and our new "Double Vision 

# Plus" for owners of Computer STOP'S Double Vision 80-column board. 

Lazer's products are compatable with more word processors than anybody else's. Our Lower Case + Plus is compatable 
with Easywriter and unmodified Apple writers. None of our competitors below can make that claim. In fact, BASIS' board 
isn't even compatable with Programma's PIE! The following chart lists Lazer's superiority over the competing units. 

(lO Lower Case • Plus LC*II Lower Case • Plus ll KB- • Keyboard • Plusl 

Paymar KB+/ KB+/ 

Feature LCA-1 LCA-2 VIDEX BASIS VISTA LC+ LC+II LC+II LC+ KB+ 

True ASCII upper/lower 

case display YYYYNYYYYN 

Inverse Lower Case N N rev 7 only N — Y N N Y — 

Font Size 5x7 5x7 5x8 5x8 — 5x7, 7x8 5 x 7 5x7 5x7, 7x8 — 

# of on-board character sets up to 4 

1 1 1 1 — (2 std) 1 1 up to 4 — 

Pseudo-descenders YYNN YYYY 

True descenders N N Y Y — optional N N optional — 

Optional fonts avail. (ROM, disk) NNNY-YNNY 

2716-compatible character 

generator compatable with fonts NNNN — YNN Y — 

created by HIRES character 

generators 

On-board graphics character setN N N N — Y N N Y — 

Software provided on diskette $5 extra NN — YNNYY 

Single board works with all Apples NNNNYYNNYY 

Expandable System NNNNNYYYYY 

Extensive user Documentation NNYNNYYYYY 

High quality PC board N_YYYY — YYY 

Reset key disable NNYYNNNYYY 

Shift key mod NNYYNNNYYY 

All 128 characters available 

from keyboard __N N — — — Y Y Y 

Type ahead buffer NNNNYNNYYY 

# of characters in buffer _ _ _ _ 40 — — 64 64 64 
Ability to clear or turn off buffer ____n__y y y 
PRICE 59.95 49.95 129.95 125.00 49.95 64.95 29.95 129.90 164.90 99.95 

Don't settle for anything less than the Lower Case* Plus, Lower Case + Plus II, or Keyboard + Plus. If your dealer doesn't 
stock our products give us a call, we'll try to connect you with a dealer in your area. 

Before you buy a lower case system for the Apple II, call or write for our free booklet "Keyboard Enhances/Buffers and 
Lower Case Adapters: From The Inside Out." This booklet explains the advantages and disadvantages of using a lower 
case adapter in your Apple II. 

Lazer products are carried by reput- State of the art performance, software Visicalc Users! Now you can 

able dealers all across the world. If your compatability, and exceptional value have lower case on your Visicalc 

dealer cannot provide you with a make Lazer's products the best there are! Screen, only from Lazer. 
demonstration of our equipment and . ,, „. «... nc: 

tries to sell you an inferior lower case Lower Case ♦ Plus $64.95 

adapter, give us a call, we'll give you the Keyboard * Plus $99.95 ^ 

location of a dealer that can show you Lower Case - Plus II $29.95 K ^%^W ^\ »t / 

our equipment Remember, an intel- Character Set - Plus $24.95 MQ ^^ X^M 

ligent purchase cannot be made if you Double Vision * Plus $39.95 ^^g^^^Q SYS TE MS—*-^ 

do not compare before buying. 1791-G Capital 'P\ 

Anixl.O $49.95 Corona, CA 91720 / ^ 

Lazer Pascal $39.95 (714)735-1041 / 
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JUDGE THE REST, THEN BUY THE BEST 

Only GIMIX offers you SOFTWARE SWITCHING between MICROWARE's OS-9 and TSC's 

FLEX. Plus you get the power of the GMXBUG system monitor with its advanced debugging 
utility, and memory manipulation routines. A wide variety of languages and other software is 
available for these two predominant 6809 Disk Operating Systems. 

You can order a system to meet your needs, or select from the 6809 Systems featured below. 

JUDGE THE FEATURES AND QUALITY OF GIMIX 6809 SYSTEMS 

GIMIX' CLASSY CHASSIS™ is a heavyweight aluminum mainlrame cabinet with back panel cutouts to conveniently connect your terminals, printers, drives, monitors, 
etc. A 3 position keyswitch lets you lock out the reset switch. The power supply teatures a terro-resonant constant voltage transformer that supplies 8V at 30 amps. + 15V at 
5 amps, and - 15V at 5 amps to insure against problems caused by adverse power input conditions. It supplies power lor all the boards in a fully loaded system plus two 
5 'A" drives (yes! even a Winchester) that can be installed in the cabinet. The Mother board has fifteen 50 pin and eight 30 pin slots to give you the most room for expansion 
of any SS50 system available. 1 1 standard baud rates from 75 to 38. 4K are provided and the I / section has its own extended addressing to permit the maximum memory 
address space to be used. The 2 Mhz 6809 CPU card has both a time of day clock with battery back-up and a 6840 programmable timer. It also contains 1K RAM, 4 
PROM/ROM/RAM sockets, and provides for an optional 951 1A or 9512 Arithmetic Processor. The RAM boards use high speed, low power STATIC memory that is fully com- 
patible with any DMA technique. STATIC RAM requires no refresh timing, no wait states or clock stretching, and allows fast, reliable operation. The system includes a 2 port 
RS232 serial interface and cables. All GIMIX boards use gold plated bus connectors and are fully socketed. GIMIX designs, manufactures, and tests in-house its complete 
line ot products All boards are twice tested, and burned in electrically to insure reliability and freedom from infant mortality of component parts. All systems are assembled 
and then retested as a system after being configured to your specific order. 

56KB 2MHZ 6809 SYSTEMS WITH GMXBUX/FLEX/OS-9 SOFTWARE SELECTABLE 

With #58 single density disk controller $2988.59 

With #68 DMA double density disk controller $3248.49 

to substitute Non-volatile CMOS RAM with battery back-up. add 300.00 

for 50 Hz export power supply models, add 30.00 

Either controller can be used with any combination of 5" and/or 8" drives, up to 4 drives total, have data recovery 
circuits (data separators), and ire designed to fully meet the timing requirements of the controller I.C.s. 

5 Va" DRIVES INSTALLED IN THE ABOVE with all necessary cables 

SINGLE DENSITY DOUBLE DENSITY 

mailed Formatted Unformatted 

Chart shows total 
capacity in Bytes for 
2 drives. 

Contact GIMIX for price and availability of 8" floppy disk drives and cabinets; and 5" and 8" Winchester hard disk system. 

128KB 2Mhz 6809 DMA Systems for use with TSC's UNIFLEX or MICROWARES's OS-9 Level 2 

(Software and drives not included) $3798.39 

to substitute 128KB CMOS RAM with battery back-up, add 600.00 

for each additional 64KB NMOS STATIC RAM board, add 639.67 

for each additional 64KB CMOS STATIC RAM board, add 988.64 

for 50 Hz export power supply, add 30.00 

NOTE: UNIFLEX can not be used with 5" minifloppy drives. 

GIMIX has a wide variety ot RAM, ROM, Serial and Parallel I/O, Video, Graphics, and other SS50 bus cards that 

can be added now or in the future. Phone or write for more complete information and brochure. 

THE SUN NEVER SETS ON GIMIX USERS 

GIMIX Systems are found on every continent, except Antarctica (Any users there? If so, please contact GIMIX so we can 
change this.) A representative group of GIMIX users includes: Government Research and Scientific Organizations in 
Australia, Canada, U.K., and in the U.S.; NASA, Oak Ridge, White Plains. Fermilab, Argonne, Scripps, Sloan Kettering, 
Los Alamos National Labs, AURA. Universities: Carleton, Waterloo, Royal Military College, in Canada; Trier in Germany; and 
in the U.S.; Stanford. SUNY, Harvard, UCSD, Mississippi, Georgia Tech. Industrial users in Hong Kong, Malaysia, South 
Africa, Germany, Sweden, and in the U.S.; GTE. Becton Dickinson. American Hoechst, Monsanto, Allied, Honeywell, Perkin 
Elmer. Johnson Controls, Associated Press, Aydin. Newkirk Electric, Revere Sugar, HI-G/AMS Controls, Chevron. Computer 
mainframe and peripheral manufacturers, IBM, OKI, Computer Peripherals Inc., Oume, Floating Point Systems. Software 
houses; Microware, T.S.C., Lucidata, Norpak, Talbot, Stylo Systems, AAA, HHH, Frank Hogg Labs, Epstein Associates, 
Softwest, Dynasoft, Research Resources U.K.. Microworks, Analog Systems, Computerized Business Systems. 

GIMIX Systems are chosen by the Pros 
because of quality, reliability and features. 

Gimix 

The Company that delivers 

Quality Electronic products since 1975. 

1337 WEST 37th PLACE, CHICAGO, IL 60609 
(312)927-5510 • TWX 910-221-4055 





Formatted 


Unformatted 


Formatted 


Unformatted 




40 track (48TPI) single sided 


199.680 


250.000 


341.424 


500,000 


2 lor $700.00 


40 track (48TPI) double sided 


399,360 


500.000 


718.848 


1,000,000 


2 (or 900.00 


80 track (96TPI) single 


404,480 


500.000 


728.064 


1.000.000 


2 lor 900.00 


80 track (96TPI) double 


808.960 


1,000,000 


1.456.128 


2.000.000 


2 for 1300.00 




TO ORDER BY HAIL 
SEND CHECK OR MONEY ORDER OR USE YOUR VISA OR MASTER CHARGE Please att* 3 weeks for personal checks to dear 
US orders add $5 handling if order is under 1200 00 Foreign orders add $10 handing if order is under $200 00 
Fomgn orders over $200.00 will be shaped via Emery Air Freght COLLECT, and we vrtl charge no handing. Al orders must De prepaid in US 
tunas Please note thai toreign checks have teen taking aoout 8 weeks tor coaecUon so we would advise wtnng money, a checks drawn on a 
bank account in the U S. Our bank is the Continental imots National Bank ot Chicago, account f 73-32033 ■■■-■ or Master Charge also accepted 
GIMIX INC reserves the nght to change pricing and prtouct specifications at any time without further notice 
are registered trademarks ot GIMIX Inc 

FLEX AND Unrnex are trademarks ot Technical Systems 

Consultants Inc 0S-9 fi a trademark ot Microware inc See mew ads for 

other Gimuc compatible software 



PET "Listener" 



This article describes an easy- 
to-build device for listening to 
PET cassette tapes. In addition 
to detecting and correcting tape 
troubles, it doubles as a CB2 
sound amplifier. 



Louis F. Sander 

and Victor H. Pitre 

153 Mayer Drive 

Pittsburgh, Pennsylvania 15237 



Soon after acquiring my PET, I learned 
about CB2 sound, and bought a small 
Radio Shack amplifier-speaker to let 
me hear it. A bit of experimentation 
showed that the amplifer was also use- 
ful for listening to tape LOADs and 
SAVEs, and that listening to these pro- 
cesses would let me detect bad LOADs, 
attempts to SAVE without pressing 
RECORD, and misaligned heads. The 
amplifier quickly became my most use- 
ful PET accessory, and with it I was 
able to avoid tape problems of any 
kind, and have a lot of fun using sound 
in my programs. 

But there were some drawbacks. For 
instance, my amplifier's volume was 
hard to keep at a comfortable level, and 
it used up a lot of batteries. More im- 
portantly, when I wanted to switch 
from CB2 to tape monitoring, I had to 
open up my PET and move the input 
lead from one place to another. 

These problems were a nuisance, so 
a friend and I designed a simple circuit 
to overcome them. This article des- 
cribes an easy-to-build gadget for listen- 
ing to PET's CB2 sound, and for moni- 
toring record and playback on either 



tape drive. Output is adjustable from 
silence to a pleasingly loud level, and 
there are no batteries to replace. Input 
switching is automatic, and several in- 
puts can be active at once without dis- 
rupting operation. The unit can be built 
in a few hours from common parts, at a 
total cost comparable to that of my 
original speaker-amplifier. 



Construction 

The finished Listener is pictured in 
figure 1 . 1 built mine on a small piece of 
perfboard, which 1 mounted to the auto- 
mobile speaker control used for adjust- 
ing volume. The perfboard and its 
push-in terminals make construction 
easy, but there is nothing critical about 
this method, and the unit could be 
built on a scrap of wood, at a savings of 



about half the total cost of parts. If you 
use my method of construction, mount 
the perfboard with flat head screws, 
and countersink them to give a flat bot- 
tom surface to your Listener. 



Figure 2 is a schematic and wiring 
diagram, including a complete parts 
list. Just follow it as you build the 
Listener, and you can't go far wrong. 
You'll probably already have at least 
some of the hardware around the house. 
Construction is straightforward, if 
somewhat delicate; be careful about 
shorts and poor connections. Observe 
the proper polarity of the diodes — the 
end without the band is connected to 
the IC socket. Also, use pliers to pro- 
tect the diodes when cutting or solder- 
ing their leads. Pin 1 of the 7404 is 
identified by an embossed dot, so be 
sure you plug it into pin 1 of the socket. 




Figure 1: The Listener — a useful sound device for the PET. 
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Figure 2: Listener Construction Diagram 
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Parts List 






Symbol 


Description 


Radio Shack Part § 


Dl, D2, D3 


1N914 Diodes 


276-1122 




Rl 


330 Ohm, !4 Watt Resistor 


271-1315 




R2 


47 Ohm, !4 Watt Resistor 


271-1307 




R3 


Auto Speaker Control (100 ohms) 


40-550 




SPKR 


l l A" Round Replacement Speaker 


40-246 




Ul 


Type 7404 Hex Inverter IC 


276-1802 






14-Pin DIP IC Socket 


276-1999 




Pre-drilled Phenolic Board 


276-1395 




Push-in Terminals 


270-1392 






Hookup Wire 


278-1307 






6-32 x Vt" Machine Screws (2) 


64-3012 






6-32 Nuts 


64-3019 






6-32 x V*" Spacers 


64-3024 






Double-sided Foam Tape Strips 


64-2344 





PET circuit board. If you cringe at the 
thought of cutting or soldering inside 
your machine, just poke the stripped 
Listener wires into the back of the tape 
unit connector, and rely on the me- 
chanical connections to pick up your 
voltages. The READ #2 wire from the 
Listener goes to the READ line of tape 
unit #2, and the CB2 wire goes to pin M 
of the Parallel User Port. 

Use double-sided foam tape to 
mount your Listener and its speaker in- 
side the PET. I drilled a hole (shudder!) 
in the left side of my PET to clear the 
Listener shaft and give me an external 
volume control. If you don't like drill- 
ing, just mount the control elsewhere. 



The Listener should work as soon as 
you power up your PET. You should 
hear the output from either tape 
whenever the cassette unit is running, 
whether or not PET is reading the tape. 
This is handy in pre-positioning tapes, 
and for evaluating their quality without 
LOADing them. In my experience, bad 
tapes usually sound bad on the 
Listener. In my PET, I can also hear the 
tape while I'm SAVEing, but this is 
untested with the newer recorders. If I 
am trying to SAVE onto a blank tape 
and have forgotten to press RECORD, 
the absence of sound alerts me to that 
fact. But if the same thing happens 
with an already recorded tape, I hear 



The push-in terminals make conven- 
ient tie points for input, output and 
power wires, but as mentioned before, 
they can be dispensed with. The long 
wires that come on the speaker control 
can be cut off and used to make other 
connections. 

Installation and Operation 

The Listener requires several con- 
nections to your PET, and the TAPE #1 
connector is a good place to make most 
of them. I stripped tiny places on the 
GND, +5 and READ wires coming 
from my built-in recorder, and soldered 
the appropriate wires there. The 
Listener's READ #1 wire goes to the 
tape player's READ wire, GND goes to 
either one of the two GND wires, and 
the +5 wire goes to the +5 wire. The 
identities of the tape unit wires are 
plainly marked on PET's circuit board. 

You could also make up a connector 
to go between the recorder and the 
PET, picking up these connections 
from it. Or you could carefully solder 
the wires to the proper points on the 



Figure 3; Listener Logic Diagram 



TOCB2 ^_ 



TOREAD#1 <- 



TO READ #2 



<r 



^> 






D1 



«-f-4>* 



D2 

-w- 



D3 

-H- 



330 



11 



C» 



13 



{> 




No. 43- December 1981 



MICRO - The 6502/6809 Journal 



15 






. 















ri 



i 




Used at NASA, 

Kennedy Space Center 

With Multiple Applications Related 

to the Columbia Space Shuttle Project 



DEADER INQUIRY WELCOME. 
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JINI MICRO-SYSTEMS, Inc. 

DATABASE MANAGEMENT SYSTEM DESIGN 

BOX 274 KINGSBRIDGE STN., RIVERDALE, N.Y. 10463 (212) 796-6200 



the existing material, and not my 
SAVE, so the alert doesn't work. That's 
just one more reason to bulk erase your 
tapes before SAVEing onto them. 

Of course the Listener will also 
reproduce any sound your CB2 line 
puts out. The programming aspects of 
CB2 sound are described in detail in the 
Best of the PET Gazette and elsewhere, 
so we will not go into them here. Many 
commerical programs use it, so you will 
be able to take advantage of sound even 
if you don't know how to program it. 

Your Listener should work for years 
without further attention from you, 
and it should provide you with many 
hours of fun with CB2 sound, as well as 
with relief from tape-connected anxiety. 



Theory of Operation 

The Listener's circuit is simple, and 
analyzing it requires only an elemen- 
tary understanding of resistors, diodes 
and inverters. If you have any electrical 
knowledge at all, but are new to digital 
circuits, pages 6-11 of Radio Shack's 
Engineer's Notebook (#276-5001) con- 
tain all the information you'll need to 
follow our analysis. Let's start by look- 
ing at figure 3, and by tracing what hap- 
pens when PET's CB2 line begins send- 
ing a tone. If the tone happens to be 
1000 Hz, CB2 switches from high to 
low and back 1000 times each second. 
The loudspeaker follows the switching, 
and we hear the tone. This is why we 
hear it: 



CBM/PET? SEE SKYLES ... CBM/PET? 



"Should we call it Command-O 
or Command-O-Pro?" 

That's a problem because this popular ROM is 
called the Command-O-Pro in Europe. (Maybe 
Command-O smacks too much of the military.) 

Bui whatever you call ii, this 4K byte ROM will provide your CBM BASIC 4.0 (4016, 
4032( and 8032 computers with 20 additional commands including 10 Toolkit program 
editing and debugging commands and 10 additional commands for screening, formatting 
and disc file manipulating. (And our manual writer dug up 39 additional commands in the 
course of doing a 78-page manual!) 

The Command-O extends Commodore's 8032 advanced screen editing features to the ulti- 
mate. You can now SCROLL up and down, insert or delete entire lines, delete the char- 
acters to the left or right of the cursor, select TFXT or GRAPHICS modes or ring the 
8032 bell. You can even redefine the window- io adjust it by size and position on your 
screen. And you can define any key to equal a sequence of up to 90 key strokes. 

The Command-O chip resides in hexadecimal address S9000, the rightmost empty socket 
in 4016 and 4032 or the rearmost in 8032. If there is a space conflict, we do have Socket- 
2-ME-. available a) a very special price. 

Skyles guarantees your satisfaction: if you are not absolutely happy with your new 
Command-O, return it to us within ten days for an immediate, full refund. 

Command-O from Skyles Klectrie Works $75.00 

Complete with Socket-2-Me 95.00 

Shipping and Handling /USA/Canada) S2.50 {£u rope /Asia) $10.00 

California residents must add 6%/6'/i% sales lax, as required. 

SkyleS Electric Works Visa/Mastercard orders: call tollfree 

231E Soulh Whisman Road (800) 227-9998 (except California). 

Mountain View, California 94041 California orders: please call (415) 

(415) 965-1735 965-1735. 



/lAiaO " S31A>1S 33S 6l3d/IAiaO "' c/> 
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Consider the Listener's CB2 input, 
which is connected to pin 1 in figure 3. 
Before the tone begins, CB2 and both 
other inputs are idling at a high logic 
level of +5 volts. The inverter between 
pins 1 and 2, seeing a high level at pin 
1, puts a low logic level, or zero volts, 
onto pin 2. Dl has no effect in this 
case, so point A and pin 9 are also low. 
Another inverter, actually three in 
parallel, makes pin 8 high. Since there 
is + 5 volts at points B and C, there is 
no voltage drop between them, and the 
speaker sees no voltage across its voice 
coil. Everything is silent. 



When CB2 begins sending its tone, 
pin 1 goes to a low level, and the two 
inverters take pin 8 low, too. This puts 
5 volts across B and C (0 volts at B, +5 
volts at C). The speaker sees some 
amount of this voltage, depending on 
the setting of the volume control. At 
the end of the tone's first pulse, CB2 
goes high again, taking pin 8 high, and 



removing the voltage drop across the 
speaker. This back and forth routine 
continues as long as CB2 keeps sending 
its pulses. The speaker follows it, and 
we hear the tone. 



If either tape begins to play, its 
READ pins begin switching from high 
to low at an audio rate, and the 
resulting sound gets through to the 
speaker in exactly the same way as the 
CB2 tone. If several inputs are active at 
one time, the speaker will follow all of 
them, and there will be no adverse in- 
teraction except in your own ears, be- 
cause Dl - D3 isolate everything to 
their left from the voltage swings at 
point A. The 330 ohm resistor 'pulls 
down' point A to zero volts as soon as 
pins 2, 4 and 6 go low, and that's all 
there is to the circuit. 

Now that you know how it works, 
doesn't that CB2 music sound just a 
little sweeter? 



Editor's Note: 
Programming CB2 Sound 

The author follows Hal Chamber- 
lain's convention of using pins M 
(CB2) and N (ground) from the parallel 
user port. 

Three addresses are involved: 

POKE 59467,16 (sound on) or 
(sound off) 

POKE 59464, 1 - 255 (high to low 
pitch) 

POKE 59466,15 or 51 or 85 (three 
different ranges) 

When done with sound always: 

POKE 59467,0 : POKE 59464,0 : 
POKE 59466,0 

If you don't do this, your cassette 
won't work properly! 

JUCftO 
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BOX 120 

ALLAMUCHY, N.J. 07820 

201-362-6574 



HUDSON DIGITAL ELECTRONICS INC. 

THE TASK* MASTERS 

HDE supports the *TIM, AIM, SYM and KIM (TASK) with a growing line of computer programs and 
peripheral components. All HDE component boards are state-of-the-art 4%" x 6% , with on board 
regulation of all required voltages, fully compatible with the KIM-4 bus. 



. 



OMNIDISK 65/8 and 65/5 

Single and dual drive 8" and 5 1 /»" disk systems. 
Complete, ready to plug in, bootstrap and run. 
Include HDE's proprietary operating system, 
FODS (File Oriented Disk System). 



DM816-M8A 

An 8K static RAM board tested for a minimum of 
100 hours and warranted for a full 6 months. 



DM816-UB1 

A prototyping card with on-board 5V regulator 
and address selection. You add the application. 



DM81 6-P8 

A 4/8K EPROM card for 2708 or 271 6 circuits. 
On board regulation of all required voltages. 
Supplied without EPROMS. 



DM816-CC15 

A 1 5 position motherboard mounted in a 1 9" 
RETMA standard card cage, with power supply. 
KIM, AIM and SYM versions. 



DISK PROGRAM LIBRARY 

Offers exchange of user contributed routines 
and programs for HDE Disk Systems. Contact 
Progressive Computer Software, Inc. for details. 

AVAILABLE DIRECT OR 



HDE DISK BASIC 

A full range disk BASIC for KIM based systems. 
Includes PRINT USING, IF . . . THEN . . . ELSE. 
Sequential and random file access and much 
more. $175.00 

HDE ADVANCED INTERACTIVE 
DISASSEMBLER (AID) 

Two pass disassembler assigns labels and con- 
structs source files for any object program. 
Saves multiple files to disk. TIM, AIM, SYM, KIM 
versions. $95.00 

HDE ASSEMBLER 

Advanced, two pass assembler with standard 
mnemonics. KIM, TIM, SYM and KIM cassette 
versions. $75.00 ($80.00 cassette) 

HDE TEXT OUTPUT PROCESSING SYSTEM 
(TOPS) 

A comprehensive text processor with over 30 
commands to format and output letters, docu- 
ments, manuscripts. KIM, TIM and KIM cassette 
versions. $135.00 ($142.50 cassette) 

HDE DYNAMIC DEBUGGING TOOL (DDT) 

Built in assembler/disassembler with program 
controlled single step and dynamic breakpoint 
entry/deletion. TIM, AIM, SYM, KIM AND KIM 
cassette versions. $65.00 ($68.50 cassette) 

HDE COMPREHENSIVE MEMORY TEST 
(CMT) 

Eight separate diagnostic routines for both 
static and dynamic memory. TIM, AIM, SYM, 
KIM and KIM cassette versions. $65.00 ($68.50 
cassette) 
FROM THESE FINE DEALERS: 



Progressive Computer Software 
405 Corbin Road 
York, PA 17403 
(717)845-4954 



Johnson computers 

Box 523 

Medina, Ohio 44256 

(216)725-4560 



Lux Associates 
20 Sunland Drive 
Chico, CA 95926 

(916)343-5033 



Falk-Baker Associates 

382 Franklin Avenue 

Nutley, NJ07110 

(201)661-2430 

Laboratory Microcomputer Consultants 

P.O. Box 84 

East Amherst, NY 14051 

(716)689-7344 



Perry Peripherals 

P.O. Box 924 

Miller Place, NY 11764 

(516)744-6462 
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Memory — you never seem to have quite 
enough of it. 

But if you're one of the thousands of Apple 
owners using the SoftCard, there's an economical 
new way to expand your memory dramatically. 

16K ON A PLUG-IN CARD. 

Microsoft's new RAMCard simply - 
plugs into your Apple II,® and adds 16k 
bytes of dependable, buffered 
read/write storage. 

Together with the SoftCard, 
the RAMCard gives you a 56k 
CP/M® system that's big enough 
to take on all kinds of chores that 
would never fit before (until now, 
the only way to get this much 
memory was to have an Apple 
Language Card installed). j. 

GREAT SOFTWARE: 

YOURS, OURS, OR THEIRS. ^ 

With the RAMCard and 
SoftCard, you can tackle large- 
scale business and scientific 
computing with our COBOL and 
FORTRAN languages. Or greatly 1 
increase the capability of CP/M 



/**n£sorr 



applications like the Peachtree Software account- 
ing systems. VisiCalc™ and other Apple software 
packages can take advantage of RAMCard too. 

And RAMCard gives you the extra capacity to 
develop advanced programs of your own, using the 
SoftCard and CP/M. Even with the RAMCard in 
place, you can still access your ROM BASIC 
1 and monitor routines. 

1 JOIN THE SOFTCARD 
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The RAMCard is just the 
latest addition to the SoftCard 
family — a comprehensive sys- 
tem of hardware and software 
that can make your Apple more 
versatile and powerful than you 
ever imagined. 

Your Microsoft dealer has all 
the exciting details. Visit him 
soon, and discover a great idea 
that keeps getting better. 

Microsoft Consumer 
Products, 400 108th Ave. N.E., 
Suite 200, Bellevue, WA 98004. 
(206)454-1315. 

SoltCard, RAMCard and Microsoft are trademarks 
ot Microsoft, Inc. Apple II is a registered 
trademark of Apple Computer Inc. 2-80 is a 
registered trademark of Zilog, Inc. CP/M is a 

registered trademark of 
A K73 Digital Research inc. 

'." ' VisiCalc is a registered 

trademark of Personal 

,•; Software, Inc. Microsoft 

Consumer Products is a 
division of Microsoft, Inc. 




APPLIED ELECTRONIC COMPONENTS, INC. 

69 ROUTE 23 SOUTH • RIVERDALE, NEW JERSEY 07457 
Phone (201) 835-8950 
835-9196 



ALL PRODUCTS IN STOCK 
WE SHIP WITHIN 24 HRS. 



MEMORY 



MICROPROCESSOR CHIP 



6502PC 

6503 PC 

6504 PC 
6505PC 
6520/6821 PC 
6522PC 

6530PC 
6532PC 
6551 PC 



6800PC 
6802PC 
6808PC 

6809PC 
6810PC 
682 IPC 

6845PC 
6850PC 
6852PC 



7.96 

8.35 

8.35 
8.35 
6.95 
7.95 

17.85 
10.95 
12.40 



5.85 
9 65 
8.4S 

19.95 
2.95 
2.95 

24.86 
3.25 
3.95 



DESCRIPTION 



6500 SERIES 



PIN 
PACKAGE 



8 Bit Microprocessor with Clock, Sync & RD4 Signal 

plus 65K Addressable Bvies of Memory 

8 Bit Microcomputer with Clock and 4K In Memory. 8 Bit Bui 

Interrupt and NMI Interrupt 

8 Bit Microprocessor with Clock. 8K ol Memory 

8 Bit Microprocessor with Clock. RD4 Signal. 4K o< Memory 

Peripheral Interlace Adapter (PIAl 

Versatile Interlace Adapter (VIA! 

Memory, I/O Timer Array. 8 Bit Bui, 8K In ROM and 64x8 In 

RAM I/O Timer Array (1 28*8) 

Asynchronous Communication Interlace Adapter (ACIA) 
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6800 SERIES 



PIN 
PACKAGE 



8 Bit Microprocessor 16 Bit Address Bus 1MHz 

8 Bit Microprocessor with Clock and RAM 

Same as 6802 without Memory, can utilize up to64K ol E* 

ROM or RAM 

8 Bit Processor with 16 Bit Internal Capacity 

128*8 RAM 

Peripheral Interlace Adapter (PlA) 

CRT Controller 

Asynchronous Data Adapter IAOA) 

Synchronous Serial Data Adapter (SSOA) 
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t- Accessories 

Of Apple II* Computer* 



411B I6K Dynam,c RAM 


200 NS 
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POPULAR PUBLICATIONS 



mini-ROM" Board — Oouble Sided hlojt quolttv 
board employ"*, fait low power IC's and a 
quality 24 pm socket lor a single voltage 
7716 EPROM For Apple II*. Eas-ly 
accessed - $29 9S 

DOUBLE T>" BOOTER" Programmed 2716 

gives Apple II' the capability to bool 3.2 or 
3.3 DOS wiil> a single keystroke. Plugs mlo 
mini ROM - boaid -$19.95. 

Type A LCA lower Case Adapter lor Appk II* 

Word processing applications. 96 character 
ASCII set. Easy plugin. For Rev 7 main 
Boards - $24.95. 
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PRICE 
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Microprocessors for Measurement & Control lAug.l 


S15.99 




35-7 


6809 Assembly Language Programming 
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'Apple II is a registered trademark ol 
Apple Computer . Inc 
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Watch that Ground 
Connection 



A properly connected ground is 
more than a precaution against 
shock — even the smallest 
oversights can lead to serious 
damage to your computer's 
components. 



Raymond Weisling 
Jalan Citropuran No. 23 
Surakarta, Jawa Tengah, 
Indonesia 



As typical computer systems grow in 
size and complexity, with more and 
more pieces of equipment intercon- 
nected, there is a growing danger of 
damage to sensitive circuits from 
casual interconnect practices. Here we 
will look at some of these dangers, 
their causes, and what protective 
measures can be taken to insure safety 
to our expensive equipment. These 
dangerous practices are even more like- 
ly to strike the experimenter who uses 
less integrated systems; i.e., those 
systems which are built around 
smaller, less packaged devices such as 
the single board computer and its 
peripherals. 

Exactly what dangers are we talking 
about? The source of most of the prob- 
lems, or potential problems, is the 
mains power line that supplies the 
115/230 volt AC power. For human 
safety, the United States (and other 
countries as well) has moved toward 
adopting a three-conductor plug-socket 
standard, where the third wire is an 
earth ground connection. The major 
idea here is that cases and frames of 
appliances can be assured of a good 
ground, in the event of an internal 
short to the case or frame, preventing a 
potentially fatal situation. Most of us 



"HOT" 



GROUND 



-~_r»-»-v> — * 

L CA icB 



i 



NEUTRAL 



CA 



T^ 



-O — L-rmrrT— ±_ 



CB 




Figure 1: Typical Power Supply Primary (Fuse and Pilot Lamp Omitted) 



are aware of this, but at the same time, 
most of us are also aware of wide- 
spread misuse of the intended safety 
feature. Many homes are not equipped 
with the newer sockets, and so the 
ground pin is defeated in some way. 
(The U.S. style plug is more easily 
abused in this way than some other 
styles in use in the world.) We go on 
using the equipment, which works just 
as well without this ground connec- 
tion. Barring the rare case of a line-to- 
case short, there is no problem. 



Or is there? Well, if the equipment 
in use is a computer-related device, 
serious damage can result due to 
misuse of ground connections. The 
same damage can even occur if there is 
such a ground connection, but where it 
has failed to make proper contact. 
(Wom sockets or broken wires inside 
the cable are typical causes.) Let us 
analyze the problem to understand how 
this can happen. 



All of the computer devices, 
printers, disk systems, CRT's, etc., 
have power transformers, and many 
now employ line filters (see figure 1). 
The transformers usually have some 
capacitance between the primary and 
the iron core and the secondary. This 
represents a leakage path for the AC 
power. The use of a noise filter is 
guaranteed to offer a path for the AC 
line to the ground, or frame. Figure 2 
shows some values of such capacitance 
and the possible current that can flow 
into the ground. Note that the noise 
filter configuration is a voltage divider 
for this AC flow, since the neutral line 
is usually well-connected (or else the 
equipment cannot operate), and thus 
the current available is half as great as 
in figure 2. But if the mains power is 
230 volts, the current will be doubled. 

If one of a group of devices has an 
open ground line, while the others are 
safely grounded, and if the data con- 
nector is inserted or removed, this cur- 



Total 






Current 


Capacitance 


Reactance 


In Ground 


CA+CB+CS 


At 60 Hz 


At 115V 


100 pf 




25 M Q 


4 jiA 


1.0 nf 




2.5 MQ 


40 jiA 


10 nf 




250KQ 


400 mA 


100 nf 




25KQ 


4mA 


1.0 id 




2.5KQ 


40 mA 


Figure 2 
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FIgun 3: Death of a chip. Arrows show currant path from Devlce-A to Devlce-B, via IX. devices, despite both power 
switches being "off." 



rent can flow along an unpredictable 
path between the two pieces of equip- 
ment. While the items are connected, 
there is no problem, since the data 
ground path also carries the power line 
leakage current. But when the connec- 
tors are partly connected, as during in- 
sertion or withdrawal (or even an in- 
advertant withdrawal where no locking 
mechanism is in use), the data ground 
may not be connected while other data 
lines are connected. This is the kiss of 
death. (See figure 3.) The sensitive in- 
put circuits, or even the output drivers, 
may not take this abuse. Any on-chip 
protection diodes may not handle the 
current since they are small structures; 
off-chip protection diodes of more 
substantial size are not commonly 
employed, as they add cost and have 
large capacitances which degrade the 
risetimes of the data signals. And, since 
the density of ICs is increasing while 
the power dissipation is decreasing, the 
newer devices are more sensitive to 
such abusive voltage and current. An 
important thing to remember is that 
this danger does not disappear when 
the equipment is turned off, since the 
input line filters are usually located up- 
stream of the mains switch. Further, if 
only a single pole switch is employed, 
there is a chance that the hot side of the 
line is still connected to the 
transformer and the capacitive-coupled 
path remains present. 

It might be appropriate to digress 
here on connector design and pin 
assignment, if only as a reminder to 
designers, in view of the dangers 



described above. There are a few types 
of connectors in use where the intended 
ground pin is the first to make and the 
last to break during mating. The three- 
prong U.S. standard AC plug and the 
"Cannon XLR" audio connectors are 
two examples; both are equipped with 
this feature for different reasons. (The 
XLR connector used in professional 
audio systems can be mated even if on a 
"hot" microphone channel without 
any induced hum; the common "RCA 
Phono" plug used in consumer audio 
connections is quite the opposite, en- 
suring that the shield makes last.] Data 
connectors, on the other hand, never 
employ this strategy, and so whatever 
pin happens to make first is the one to 
carry any unwanted current. Equip- 
ment designers could offer a partial 
measure of safety by assigning the 
outermost pins on either side to 
ground. Then if the connector is ac- 
cidentally partly tugged out of the 
socket by a taut cable, a ground on one 



of the two sides still makes contact. 
However, for straight-in manual inser- 
tion, it is still a gamble as to what will 
happen. 

We can ensure the safety of our ex- 
pensive equipment through some pre- 
ventive measures. One is to be sure all 
equipment has a good plug and cable 
connection for the ground or frame. 
Figure 4 illustrates a simple test set for 
this, intended to be built into a small 
case and employed periodically to in- 
sure that the cable is still good. (Plug in 
the mains cable and clip the wire to the 
frame, then flex the cable, especially 
near either end. If the path opens, the 
audio tone will come on.) 

Another technique is to intercon- 
nect data cables only with the equip- 
ment unplugged fully. This can be a 
nuisance, but if you are using a power 
distribution strip with only one wall 
plug, it is much easier. If this strip has a 
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switch, it may be used if it breaks both 
sides of the line. (Check it with an 
ohmmeter. ) Of course, be sure that the 
wall socket ground pin really is con- 
nected to a solid earth ground. 

Finally, if an additional level of 
safety is desired, a separate ground wire 
can be connected to each piece of 
equipment, and then brought to a 
single common point. 

Case History 

A few years ago I was programming 
on a minicomputer-based music syn- 
thesizer. The studio was too small for 
the Centronics 102A printer to be left 
permanently in place, so it was wheeled 
in each time a programming session 
took place. It was then connected to 
the computer interface wire-wrap panel 
and plugged into an empty wall socket. 
However, the whole computer system, 
synthesizer, 8-track tape deck, etc., was 
"floating" from an earth ground con- 
nection. (It is anybody's guess how 
much current was available from all 
the stray capacitances in parallel.) If 
the data connection was done first, 
there was no problem, but if the wall 
plug went in first, it was Russian 
Roulette at the data connector. Most of 



the time we were lucky. The first time 
we lost, two TTL chips in the printer 
died but the cause was rather a 
mystery. The second time more chips 
died, and only then did the cause 
become apparent. After the system was 
grounded there were no more prob- 
lems, but since many people used that 
studio, I was always especially careful 
to plug the printer into the wall last. 
When you've spent six or more hours 
troubleshooting slain chips, you 
become less casual about such things. 

Conclusion 

Ground connections at the power 
socket, intended as an element of in- 
surance against a rare, but potentially 
fatal (to people), short within equip- 
ment, are frequently abused or defeated 
for reasons of convenience. However, 
in the computer environment such bad 
practices can lead to equipment 
damage from AC power leakage current 
that comes, ironically, from other safety 
devices (noise filters) or from the power 
transformer itself. Careless or casual 
interconnection of equipment without 
consideration to this danger can cause 
msyterious component failure. Observ- 
ing a few simple rules and ensuring that 
the hardware is in good condition will 
prevent these kinds of accidents. 

JMCftO 



6809 

Software 



WrIte 

OR 

CaII 
For CATAloq 



(315)474-7856 

i Frank Hogg Laboratory, Inc. J 

130 Midtown Plaza 

Syracuse, NY 13210 



Z-FORTH IN ROM by Tom Zimmer 

5 to 10 times faster than Basic. Once you use it, you'll never go back to BASIC! * 75.00 

source listing add $20.00 

OSI FIG-FORTH True fig FORTH model for 0S65D with fig editor named files, string $ 45.00 

package & much more 

TINY PASCAL Operates in fig-FORTH, an exceptional value when purchased with forth. 

TINY PASCALS documentation f 45 .00 

FORTH & TINY PASCAL $65.00 

SPACE INVADERS 100% machine code for all systems with 64 chr. video. Full color & sound 

on C2.4P&8P systems. The fastest arcade program available. $ 14.95 

PROGRAMMABLE CHARACTER GENERATOR $ 99 95 

Use OSI's graphics or make a complete set of your own! Easy to use, comes assembled S tested. 

2 Mhz. boards $109.95 

PROGRAMMABLE SOUND BOARD 'JM-JS 

Complete sound system featuring the AY-3-8910 sound chip. Bare boards available. $29.95 

32/64 CHARACTER VIDEO MODIFICATION $ 39.95 
Oldest and most popular video mod. True 32 chr. C1P, or 32/64 chr. C4P video display. 
Also adds many other options. 

ROMS!!! 

Augment Video Mod with our Roms. Full screen editing, print at selectable scroll, disk support and many more 

features. Basic 4 & Monitor J 4 ?'25 

Basic 3 J 2?.95 

All 3 for « 65.00 

65D DISASSEMBLY MANUAL, by Software Consultants. First Class throughout. 

A must for any 65D user. $24.95 

NUMEROUS BASIC PROGRAMS, UTILITY PROGRAMS AND GAMES ALONG WITH HARDWARE PROJECTS. ALL 
PRICES ARE U S FUNDS. Send lor our $1.50 catalogue with free program lhardcopy) Memory Map and Aulo Load 
Routine. 



OSI Software & Hardware 

3336 Avondale Court 

Windsor, Ontario, Canada N9E 1X6 

(519) 969-2500 





3281 Countryside Circle 

Pontiac Township, Michigan 48057 

(313) 373-0468 
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A BRIGHT NEW STAR FROM 
ANDROMEDA! 



• 



A 




NEW ROM BOARD FOR THE APPLE II * 
$125.00 WITH UTILITY ROM- 



With Andromeda's new ROM Board, you can plug many 
useful utility programs into your Apple II. Because ROM 
memory never forgets, you can access these utilities 
instantly without having to load them from disk. 

The ROM Board comes with the utility ROM. which 
gives you five powerful options to apply to your 
Applesoft* programs. With the Utility ROM, you can do 
automatic line numbering, control a program list with a 
page mode, restore a crashed Applesoft* program in 
memory, alphabetize a disk catalogue and create a disk 
without DOS. giving you an extra 8K on your disk. Any of 
Soft Control Systems' other ROMS can be used, such as 
the Dual DOS in ROM, and Your'ple ROM. 

You can install 2K PROMS, 4K PROMS, or even 2K 
RAM chips in each of the two memory sockets. So you 
can even have the Read - Write capability of RAM to 
develop PROM Programs yourself, or just have an extra 
2K RAM for your machine - Language programs. Two 
2732 PROMS allow a total of 8K of memory on the Board. 



Now with One Year Warranty. 

/UDHOMEDA 

M INCORPORATED 

(^ Greensboro, NC. 27410 
919 852-1482 P.O. Box 19144 

Price for Andromeda I6K RAM 
VISA' | expansion board now only S 1 20 00. 
Please add S5 for shipping and 
handling. North Carolina residents 
add 4% sales tax. 
'DEALER INQUIRIES WELCOME 





APPLE • ALTOS • ATARI • MAXELL • DYSAN • EPSON • CCS • SHARP • CASIO • HP • VERBATIM • MEMOREX • SOROC • CORVUS • ADDS 



- C ALTOS 8CS 8000-15 "wo 445000 1540 00 
5 f SHARP-64K Z80 FUU KBD YX-3200 CALL 



/VIICRO 

BUSINESS WORLD INC. 
Information Line (213) 996-2252 
TOLL FREE MAIL ORDER LINES 

(800) 423-5886 outside Cain. 



COMPUTERS 

■oppfcl computer 




Apple IM6K 
Apple II-32K 
Apple II-48K 
Apple II-64K 
Apple III 128-K 



List 

$1 330.00 

1430.00 

1530.00 

1725.00 

3915.00 



Our 
Price SAVE 

$999.00 $331.00 

SPECIAL | 

CALL | 

2997.00 918.00 



NEC PC 8P01 



129500 1050.00 244.00 



ATARI PERSONAL 
COMPUTERS 

400 16K Bytes ol Rom 
800 16K Bytes ol Ram 
410 Program Recorder 
810 Disk Drive 
82S Printer (80 col- 

Cenlronic 737) 
820 Printer (40 col 

impact) 
830 Acoustic Modem 
850 Interlace Module 
Atari Visicalc 
Atari 400-16K 



LUI 

595.00 

$1080.00 

90.00 

600 00 

999 95 

450 00 
200.00 
220.00 
200 00 
595 00 



Our 
Price 

337.45 

739.00 

77.00 

457 00 



SAVE 

257.05 

33200 

13.00 

143.00 



769.00 230.00 



353.00 
155.00 
192.00 
164.00 
327.00 



97.00 
45.00 
48.00 
36.00 
304.00 



Eel 



HEWLETT 
PACKARD 



HP 125 Microcomputer 
HP-85 Microcomputer 
HP-83 Microcomputer 
16K Exp-Memory 

Module 
Graphics Plotter 7225 
Personality Mod 

lor 7225 
26318 Impacl/prinlerr 

hvy dly 
Option 020 lor 26318 
8 Drives lo choose Irom 

82902S 

9895A 8" Dual Drive 
Graphics Tablet 91 1 1 A 
HP-41CVNew2 2 

bytes mem 
HP-41-C Calculator 
Cord Reader lor 

41CVJC 
Printer lor 41CV/C 
Oplicol Wand lor 

41 CVIC 
Ouaa Ram equals 

4 Mem Mods 
Memory Modules lor 

41C 
HP-97 Programble 

Printer 
HP-67 Programble 

Calculaior 
HP-34C Programble 

Scienlilic 
HP.38C Programble 

Bus R.'E 
HP-32E Adv. Scienlilic 
HP-37E Business Mgmt 



3250 00 
2250 00 



295 00 
2450 00 



3950 00 
150.00 

1300 00 
6850 00 

2050 00 

325.00 
250 00 

215 00 
385.00 

125.00 

95 00 



750 00 

375.00 

150 00 

150.00 
55 00 
7500 



Our 
Price 



247500 
1777.00 



255.00 
207500 



3250 00 
125.00 

1125 00 

5500 00 
1678.00 

250.00 
185.00 

162.00 
289.00 



SAVE 

760.00 



775.00 
473.00 



40.00 
375.00 



700.00 
25.00 

195.00 
1350.00 
374.00 

75.00 
65.00 

53.00 
101.00 



97.00 


21.00 


81.00 


14.00 


25.00 


1 


59500 


175.00 


295.00 


■0.00 


117.00 


31.00 


117.00 
48.00 
57.00 


33.00 
7.00 
18.00 



We car ry a large inventory ol Libraries, accessories and 
suppltes. 



PRINTERS 


Lisl 


fc -£ — 


- —. 




EPSON 


Our Price 


SAVE 


MX 80 FT 


745.00 


549.00 


194.00 


MX 80 IMPACT 


545.00 


450.00 


195.00 


MX 70 IMPACT 


500.00 


390.00 


110.00 


MX 100 


995.00 


765.00 


230.00 


APPLE SILENTYPE 


645.00 


299.00 


346.00 


ANAOEX 9501 


1650.00 


1299.00 


351.00 


NEC 








5510 


3195.00 


2445.00 


750.00 


5515 


3295 00 


2545.00 


750.00 


3510 


2495 00 


1795.00 


700.00 


3515 


2545.00 


1849.00 


496.00 


OKIDATA 








MCROUNE 80 


545.00 


395.00 


1304)0 


MCROUNE 82 


649 00 


549 00 


100.00 


MCROUNE 83 


105000 


769.00 


281.00 


PAPER TIGER 








445G wilh Graphics 


795 00 


695.00 


1004)0 


460G wilh Graphics 


1.394.00 


899.00 


495.00 


560G New lull size 


1.695.00 


1.139.00 


554.00 


DIABLO (LETTER QUALITY) 






630 R102 bi-dlrecllonal 








tractors 


2.965.00 


2.350.00 


4154)0 


1640K109 keyboard 








tractors 


4.000.00 


2.899.00 


1,1004)5 


630 RO Receive Only 


2.710.00 


2.250.00 


440.00 


1650K 136 keyboard 








tractors 


4.000.00 


3.100.00 


900.00., 



SPECIAL OF THE MONTH 



APPLE II PLUS 
48K W/16K 
EXPANSION BOARD 



«T64K 



Our price 
$11990° 




List price SI 780. 00 
Our price S1 199.00 



Save $581.00 



APPLE II STUDENT^ 
SYSTEM 



Apple II Plus Syitcm-48K RAM 
Disk II Floppy Disk & 
Interface (DOS 3.3) 
12 Grn. Phs. Video Monitor 



I. 





MONITORS 



NEC Grn Phs 12' 
BMC Green Phs 12" 
Zenilh 12" 



S285 00 
27500 
15900 



Our 
Price 
23999 
229.00 
119.00 



SAVE 

$44.00 
44.00 
30.00 



SANYO MONITORS 

High Resolution. Number 1 seller 



List 

13" Color (new) 

high quality S550 00 

1 2" Green Phosphorous 360 00 

12" Block & While 340.00 

15" Black & While 37000 

9" Block 8. While 

The Best Seller' 235.00 



Our 
Price SAVE 



388.00 
240.00 
217 00 
235.00 



145 00 



S162.00 
120.00 
123.00 
135.00 



90.00 



DISKETTES 

SOLD IN BOXES OF 10 

(Min. Purchase) 
BUY tlOO of the 
Following Diskrtles Lift 
DYSAN price 

104.1 5" SOU SECTOR S 6 00 
10410 =' DBl 

DEN SOU SEC 640 

37401 8- SOU SECTOR 7.25 

3740110 »" DBl. 

DEN -SOET SECTOR 10 75 

MAXELL 
MD-1 5' SOFT SEC 

TOR'DBl DEN 5 00 

MD-2 = ■ son 

SSCTORDBl SIDE OBL 

DEN 7.00 

ED-1 8' SOFT SEC DBL 

DEN. 6.50 

ED-2 8' SOFT SEC .DBl 

SIDE DBl DEN 8.50 




SOFTWARE 



FOR APPLE I 



Apple Fortran 
DOS 3 3 (16 Sector] 
Apple PHOT (16 Sector) 
Apple FORTRAN 

(reauires A2B0006] 

(16 Sector) 
language System with 

Apple Pascal 
BPI General Ledger 

System 
BPI Inventory Package 

Vistdex 
Vlsicolc 
Desktop Plan II 
Microlab Database 
System 

Stoneware DB Master 
Muse Supertext n 
Soltape Magic Window 




Our 

List Price SAVE 

200 00 S 147.00 $ 53.00 

6000 45.00 15.00 

15000 119.00 31.00 



49500 39900 96.00 



395 00 
395.00 
200 00 
200.00 
200 00 

150 00 
229 00 
150.00 
99 00 



319 00 
319.00 
159.00 
159 00 
159.00 

119.00 
189.00 
119.00 
72 00 



76.00 
74.00 
41.00 
41.00 
41.00 

31.00 
40.00 
114)0 
27.00 



Our 
Price SAVE 

MB DISKETTE 

3 99 S 2.01 



4 60 
4 75 



4.00 

490 

4 50 
595 



1.80 
2.50 



14)0 

2.10 
2.00 
2.55 



TERMINALS 

TELEVIDEO 



910 
912C 
920C 
950C 



List 

699 00 

950 00 

995 00 

1.195.00 



Our 
Price 
599 00 
699.00 
795 00 
949.00 



SAVE 

10O.C0 
251.00 
2004)0 
2444)0 



DRIVES 



CORVUS 

5 MBVTES 
10 MBVTES 
20 MBYTES 



3.75000 3.050.00 700.00 
5.35000 4.449 00 901.00 
6.45000 6.450.00 1,125.00 



TEXAS INSTRUMENTS 




II 99/dA Console New 










Improved 


950 00 


38595 


544.05 




10" Color Monitor H-gh 










Resolution 


374 95 


317.95 


57.00 




32K Memory Module 


399 95 


31295 


87.00 




Speech Synthesize' 


149 96 


127 95 


22.00 




Disk Memory Drive 


499 95 


390 95 


109.00 




Rf- Modulator 


49 95 


4250 


7.45 




Telephone Coupler 










(Modem) 


224 95 


185.95 


39.00 




Printer (Solid State} 


399 95 


315.95 


84.00 












MODEMS 










NOVATION CAT MOMM 


189 95 


140 00 


49.95 




NOVATION DCAT 


199 00 


150.00 


49.00 




NOVATION APPLE-CAT 


349.00 


31000 


19.00 




HAYES MICROMODEM 


379 00 


295.00 


84.00 




HAYES SMARTMODEM 


279 00 


239 00 


40.00 














CALCULATORS 








CASK) 










HR 10 


49 95 


39.00 


10.95 




HR-12 


54.95 


42.00 


12.95 




FR-100 


79.95 


59 00 


20.95 




FR-1210 


129.95 


99 00 


30.95 




PG-20 


29.95 


23 00 


4.95 




IC-785 


1295 


10.00 


2.95 




IC-316S 


12 95 


10.00 


2.95 




FX-68 Scientific 


29 95 


23.00 


4.95 




FX-81 Scientific 


19.95 


17.00 


Z95 




FX-3600P Scientific 


39 95 


2995 


10.00 




FX-602P "Computer 










Talk 88 Memories Pro- 










gramming Upper & 










Lower Cose Dot Motnx 


129 95 


99 00 


30.95 




FX-702P Solves Problems 










with Alpha-Numeric 










Clarity, uses Basic 










Language 


199 95 


159 00 


40.95 














TELE. ANSW. DEVICES 




PHONE MATE 










900 


119.95 


86.00 


31.95 




905 Remole 


199.95 


144 00 


55.95 




910 


159.95 


115 00 


44.95 




920 


199 95 


144.00 


55.95 




925 Remote 


239 95 


17300 


44.95 




930 Remote 


299 95 


216.00 


83.95 




950 Remote 


339 95 


245 00 


94.95 




960 Remote 


399 95 


288 00 


111.95 





















l\l\(.s 

i.kwc / 

HI.(llo\ ■ , 

\Tlsl \< ;;o\ — — • 




Mil ko l/\\ 



/VHQRP BUSINESS WORLD 

IW ' T ^'> ' [ ''(J* WAREHOUSE 

UVML-^JJI iV-jJinU* r^lTll 18720 Oxnard. #108 Tarzana, CA 91356 

OUTSIDE CA CALL TOLL FREE 1 (600) 423-5886 IN CA (213) 996-2252 



lAtt a <iPPvCAEk(- _ 

.--'■... . - - V . -. 
TOTAL DtCIOUO 1 



Certified Check or M.O. 
Bank Wire Transfer 



Cash/Credit Card(Allow 2 
weeks clearance tor checksl 



^reserVe'The TTgTrtiTco "p~ Ty"o""p"~j > ToTr~~rh~~~$i7p~~g"^~ii^rev)Ous aOs._ 
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we beat the price.. 



ATARI 




800,„$749 



A 

ATARI 

Computers 
for people: 



ATARI 810 
DISC DRIVE 



s 444 




ATARI SOFTWARE 



CX404 Word Processor 


$119 00 


CX405 PILOT. . . 


$68 00 


CX413 MICROSOFT BASIC 


$68 00 


CX4101 Invilalion lo Programming 1 


$1700 




$1300 




$1700 


CX4104 Mailing List . .. 


$1700 


CX4105 Blackiack 


$1300 


CX4106 Invitation to Programming 2 


$20 00 


CX4107 Biorhythm 


$13 00 




$1300 


CX4109 Graph It 


$1700 


CX41 10 Touch Typing 


$20 00 


CX4 1 1 1 Space Invaders . . 


$1700 


CX4112 States & Capitals 


$1300 


CX4114 European Countries 8 Capitals 


$13 00 


CX4115 Mortgage & Loan Analysis 


$13.00 


CX4116 Personal Fitness Prog 


$59 00 


CX4117 Invitation lo Programming 3 


$20 00 


CX41 18 Conversational French. 


$45 00 


CX41 19 Conversational German 


$45 00 


CX4120 Conversational Spanish 


$45.00 


CX4121 Energy C?ar 


$1300 


CX4125 Conversational Italian 


$4500 



CX6001 US History 

CX6002 US Government 

CX6003 Supervisory Skills 

CX6004 World History 

CX6005 Basic Sociology 

CX6006 Counseling Proced 

CX6007 Principal ol Act 

CX6008 Physics 

CX6009 3iea1 Classics 

CX6010 Business Comm 

CX601 1 Basic Psychology 

CX6012 Effective Writing 

CX6014 Principals ol Econ 

CX6015 Spelling 

CX60I6 Basic Electricity 

CX60I7 Basic Algebra 

CX8106 Bond Analysis 

CX8107 Stock Analysis 

CX8108 Stock Charting 

CXL4001 Education System Masier 

CXL4002 Basic Computing Language 

CXL4003 Assembler Editor 

CXL4004 Basketball 

CXL4005 Video Easel 

CXL4006 Super Breakout 

CXL4007 Music Composer 

CXL4009 Chess 

CXL4010 3D Tic TacTow 



$23 00 
$2300 
$23 00 
$2300 
$23.00 
$23 00 
$23 00 
$23 00 
$23 00 
$23 00 
$2300 
$23 00 
$23 00 
$23 00 
$23 00 
$2300 
$20 00 
$20 00 
$2000 
$2100 
$46 00 
$46 00 
$24 00 
$24 00 
$30 00 
$45 00 
$30 00 
$24 00 



CXL4011 Star Raiders S39-00 

CXL4012 Missle Command $32.00 

CXL401 3 Asteroids $32.00 



CXL4015 TeleLmk ... . $20.00 

Ojmpuhome $74.95 

Visicalc $149.00 

Letter Perlect (Word Processor) ,, $119 00 

Source $89.00 



Atari* Peripherals: 



400 16K 
410 Recorder 
822 Printer 
825 Printer 
830 Modem 
850 Interlace 



Atari' Accessories 



New DOS 2 System 

CX70 Light Pen 
CX30 Paddle 
CX40 Joy Stick 
CX853 16KRAM 
Microtek 16K RAM 
Microtek 32K RAM 



$329 00 
$59 00 
$359 00 
$CALL 
$159 00 
$ CALL 



$21 00 

$64.00 
$18.00 
$18.00 
$89 00 
$75 00 
$169 00 




commodore 




CBM8032 $1099 



VIC 20 

$259 



CBM Software 

Wor0Pro3Plus $199.00 

WordPro4 Plus $299.00 

Commodore Tax Package $399.00 

Visicalc $149.00 

BPI General Ledger $329 00 

OZZ Inlormation System $329 00 

Dow Jones Portlolio $129 00 

Pascal ... $239.00 

Legal Time Accounting $449 00 

World Cratt 80 . — 

Word Check 

Create A Base 

Power 

Socket-2-Me 

Jinsam 



$289 00 

$180 00 

$239 00 

$89.00 

$20 00 

Call 



4016 

4032 

8096 

CBM4022 Printer 

Tally 8024 

CBM C2N Cassette Drive 

CBM4040 Dual Disk Drive 

CBM8050 Dual Disk Drive 



$799 00 

$999 99 
$1795.00 

$629 00 

$1699.00 

$69.00 

$999 00 
$1349.00 



Vic-TV Modual $19.00 

Vic Cassette $69.00 

Vic Disk Drive $ Call 

Vic 6 Pack program $44.00 



Disks 



CX8100 Blank Disk (5) 

Sycom Blank Disk (10) 

Maxell Blank Disk (10) 

Maxell Blank Disk (10) 

Printers 

Call (or prices on the new NEC models. 
Epson MX-70 
Epson MX-80 



$22 00 
$29 00 
$36 00 
$46 00 



)FT 



Epson MX-8 

Diablo 630 

TEC 1500 Starwriter 25cps 

TEC 1500 Starwriter 45cps 



} 



Call lor Prices 



$1495 00 
$1795.00 



No Risk, No Deposit On Phone Orders, COD or Credit Card, 
Shipped Same Day You Call * 

(800)233-8950 



IN PA. CALL (717) 327-9575 



COMPUTER MAIL ORDER 

501 E. 3RD ST., WILLIAMSPORT, PA 17701 



To Order: 

Phone orders invited (800 number is lor order desk 
only) Or send check or money order and receive 
free shipping Pennsylvania residents add 6% 
sales tax Add 3°e for Visa or M.C. Equipment 
is subject lo price change and availability without 
notice Please can between 1 1 AM & 6 PM 



• 



Proportional Joystick 

for Atari 



• 



The Atari 800 comes equipped 
with eight specially designed 
A/D converters for use with the 
paddles. These A/D converters 
may be used to interface to an 
inexpensive $5 proportional 
Joystick from Radio Shack, 
allowing a much finer control for 
games and other applications. 



Mike Dougherty 

7659 West Fremont Ave. 

Littleton, Colorado 80123 



The normal Atari joystick is a very sim- 
ple device — built to be rugged, yet in- 
expensive. The joystick consists of four 
open circuits in each of the up, down, 
right, and left directions. As the stick is 



moved in any single direction, the ap- 
propriate circuit is closed. A diagonal 
move forms a combination of two adja- 
cent closed circuits. 



The joystick inputs are brought into 
the Atari through two 6520 PIA input 
ports, the values being placed in the 
appropriate shadow registers by the 
operating system. An open circuit 
appears as a logic 1 while a closed cir- 
cuit appears as a logic 0. Thus, no con- 
tacts closed (the joystick not moved) is 
interpreted as a 15 (binary 0000 1111), 
DOWN is a 13 (binary 0000 1101), UP 
is a 14 (binary 0000 1110), RIGHT is a 
7 (binary 0000 01 1 1 ), and LEFT is an 1 1 
(binary 0000 1011). This method of 
control reduces the angular resolution 
of the joystick direction to 45°. (0°, 
45°, 90°, 135°, 180°, 225°, 270°, and 
315° are the only allowed angles.) In 
addition, there is no method to indicate 
"how much" — the joystick is either 
pulled in a specific direction or it is not. 




JOYSTICK 



pAA/WS 



Y POTENTIOMETER 



» 



♦- B PADDLE, PIN 5 
-•» +5 VOLTS, PIN 7 
-»• A PADDLE, PIN 9 



X POTENTIOMETER 



Figure 2: Joystick Interface 





C 1 2 3 4 5 ) 


\ 6 7 8 9/ 


\m . . ./ 


1) Joystick UP 


2) Joystick DOWN 


3) Joystick LEFT 


4) Joystick RIGHT 


5) B Paddle 


6) Joystick Trigger 


7) + 5 Volts 


8) Ground 


9) A Paddle 


Figure 1: Controller Jack Pin Assignment 



This binary approach is similar to 
driving a vehicle that can only move at 
55 mph or be parked — there is no way 
to "accelerate" or "slow down." To 
some degree, the problems created by 
this particular joystick design can be 
overcome by proper software. 



A smooth operating joystick is 
available from Radio Shack, catalog 
#271-1705, for about $5. This propor- 
tional joystick has a 100 KQ linear 
potentiometer for both the X and Y 
directions. The total movement is 30 
± 3 degrees in each direction. In other 
words, the resistance in the X and Y 
potentiometers is directly proportional 
to the X, Y position of the joystick with 
a range of nearly Q to 100 KQ. This 
joystick, when mounted in a suitable 
case, has all the physical character- 
istics required of an operably smooth 
joystick. 
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Fortunately, the problem of inter- 
facing the joystick to the Atari 800 has 
already been solved. Each controller 
jack input contains the four normal 
Atari joystick inputs (closed/open cir- 
cuits for each direction), the joystick 
trigger (also a closed/open circuit), two 
paddle inputs, a 5-volt source and a 
ground (see figure 1). Upon the ex- 
amination of a paddle controller, this 
controller turned out to be nothing 
more than a 1 MS potentiometer. The 
paddle input circuit digitizes the 
resistance (voltage) at the A or B paddle 
input, while the operating system 
places this value in the paddle shadow 
registers each l/60th of a second. The 
values sampled range from 1 (less than 
approximately 1200 Q) to 228 (greater 
than approximately 700 KQ). Thus, to 
digitize an external potentiometer 
value, the 5 volts of the controller jack 
should be applied to one of the two 
potentiometer inputs, and the poten- 
tiometer wiper output (middle connec- 
tor) wired to either the A or B paddle in- 
put (depending on which PADDLE(n) is 
used by the software). For poten- 
tiometers with a range less than 1 MQ, 
the digitized value will simply be less 
than 228. 



The potentiometers in the Radio 
Shack joystick have a resistance range 
of 100 KQ, giving an Atari paddle range 
of 1 to 42. For the purpose of a joystick, 
this is more than enough resolution. 
Listing 1 demonstrates a simple method 
to use the joystick to control a graphic 
dot on the screen. Figure 2 shows the 
details of the joystick interface. The 
joystick input is normalized in the pro- 
gram by a user-chosen value, 1 to 42, to 
reduce the step size taken each time in 
the main loop. Program 1 moves the 
dot proportional to the value of the 
joystick paddle inputs, allowing the 
user to accelerate and decelerate the dot 
as desired. The trace mode allows an 
an elaborate version of an "Etch-a- 
sketch." This program demonstrates 
how the joystick input would be used to 
affect objects in an application program. 



The Atari joystick is adjusted to 
return to the center position when not 
being used. However, the Radio Shack 
joystick has no such provision. One 
solution is to ignore the joystick input 
when the values drop below a certain 
threshold level. This solution creates a 
"dead" area around the center posi- 
tion, allowing for imperfect human 



1 REM JOYSTICK BY 

2 REM Mike Dougherty 

3 REM 

4 REM USING THE PADDLE A/D INPUT TO 

5 REM IMPLIMENT AN INEXPENSIVE PRO- 

6 REM PORTIONAL JOYSTICK. 

7 REM 

8 REM 

9 REM 

10 DIM ANSWER* (1) 
20 GRAPHICS O 

60 POSITION 10,5:PRINT "Trace Mode (Y/N) "jl INPUT ANSWER* 
70 POSITION 10,7sPRINT "Step scale (1-42) ";: INPUT SCALE 
80 POSITION 10, 9: PRINT "Threshold (0-42) ";: INPUT THRESH 

100 REM 

101 REM ..SET UP DRAWING FIELD 

102 REM 

110 GRAPHICS 8+16! REM HIGH RES 

113 SETCOLOR 2,7,0iREM SET TO YOUR OWN FAVORITE COLOR 

120 COLOR 1 

130 X=160iY=95:REM STARTING PLACE 

140 A=0iREM X INPUT PADDLE CHANNEL 

130 B=1:REM Y INPUT PADDLE CHANNEL 

200 REM 

MAIN LOOP: 

. . SAMPLE THE PADDLES 

..IF CENTERED, GIVE AUDIO FEEDBACK 

..COMPUTE NEW POSITION AND ADJUST FOR SCREEN LIMITS 

..IF NOT TRACING, ERASE OLD POINT 

..PLOT NEW POSITION 

..IF A SPACE IS PRESSED, WAIT UNTIL ANOTHER KEY IS PRESSED 

CONTINUE LOOP 



, INPUT JOYSTICK THRU PADDLES 



..CHECK FOR EXTENDED JOYSTICK 
.."DEAD" CENTER POSITION 



, .NEW POSITION BASED UPON PROPORTIONAL 
..JOYSTICK VALUE — KEEP ON SCREEN 



201 REM 

202 REM 

203 REM 

204 REM 

205 REM 

206 REM 

207 REM 
206 REM 

209 REM 

210 REM 

211 REM 

212 REM 

213 XDELT=-INT( (PADDLE (A) -22) /SCALE) 
220 YDELT=- INT ( (PADDLE (B) -22) /SCALE) 

225 REM 

226 REM 

227 REM 

228 REM 

229 REM 

230 IF (ABS(XDELTXTHRESH) AND (ABS ( YDELTXTHRESH)THEN XDELT=0: YDELT=0 

235 REM 

236 REM 

237 REM ..AUDIO FEEDBACK FOR CENTER POSITION 

238 REM 

240 SOUND 0,0,0,0s IF (XDELT=0) AND <YDELT=0) THEN SOUND 0,120,10,2 
243 REM 

246 REM 

247 REM 

248 REM 

249 REM 

250 XNEW=X+XDELT 
260 YNEW=Y+YDELT 
270 IF XNEW<1 THEN XNEW=1 
280 IF YNEW<1 THEN YNEW=1 
290 IF XNEW>318 THEN XNEW=31B 
300 IF YNEWM88 THEN YNEW=188 

305 REM 

306 REM 

307 REM ..ERASE OLD POINT IF NOT IN TRACE MODE 

309 REM 

310 COLOR 
320 IF ANSWER*="N" THEN PLOT X.Y:PL0T X+l . Y+l :PL0T X-1,Y-1:PL0T X+l, 

,Y+1 Y-1:PL0T X-l 

325 REM 

326 REM 

327 REM ..PLOT CURRENT DOT POSITION 

328 REM 
330 COLOR 1 
340 X=XNEW 
350 Y=YNEW 
360 PLOT X,Y:PLOT X + l, Y+l: PLOT X-l,Y-l:PLOT X+l ,Y-1 1 PLOT X-l, Y+l 

364 REM 

365 REM 

366 REM 

367 REM 

368 REM 

369 REM 

370 IF PEEK (764) =33 THEN GOTO 370 
380 GOTO 210 



. IF A SPACE IS PRESSED THEN 
.WAIT FOR ANOTHER KEY. 
.REPEAT LOOP 



, 






,< 
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judgement. A second solution is to con- 
nect one of the joystick inputs through 
a momentary switch to the ground in 
the controller jack. The software could 
be written to use the joystick paddle 
values only when this specific switch is 
pressed (the circuit is closed and the 
corresponding bit is zero). Thus, when 
the dot has been moved to the proper 
position, simply let go of the momen- 
tary switch. These and other solutions 
each have strong points suited for 
specific applications. 



As an expansion to this simple pro- 
ject, recall that the joystick inputs and 
the joystick trigger are simple open/ 
closed circuits. Thus, with five mo- 
mentary contact switches, the Radio 
Shack joystick, a suitable enclosure, 
and a nine-pin "D" connector, a high 
quality control system may be built to 
run from a single controller jack. 

JUCRO 



kim •::■ sym -::■ aim users 
sales support 

HDE DISK SYSTEMS 

NEW ADC-818-1 6 ANALOG- TO-DIGITAL CONVERTFR 
WITH 16 CHANNEL ANALOG INPUTS" 

«KIM-4 BUS COMPATIBLE 

-SB- BIT CONVERSION 

-~-80 USEC CONVERSION 

-S-BUILT ON 4- 1 /2 x 6 CARD 

*MUX-OUT AVAIL FOR ANALOG SIG CONDITIONING 

-"-BUY BUILT ANO TESTED OR SAVE SS AND BUY 
KIT 

---COMPLETE W/MANUAL AND CIRCUITS 

ADC-818-1 6 [BUILT S TESTED) $295 CO 

ADC-818-1 6KW (KIT W/WIRE WRAP 

SOCKETS! $15900 

A0C-81B-1 6KS (KIT W/SOLOER 
SOCKETS! $15900 

SOFTWARE FOR ALL FODS 
BASED SYSTEMS: 

MAIL MANAGER PRICE $49 95 

SOFTWARE FOR HDE BASIC: 

MINI-MONEY MANAGER PRICE $99 95 

MEMO-WRITER PRICE $4995 

PAYROLL OFFICE PRICE $99 95 

TAX ADVISOR PRICE $79 95 

CLASS RECORO PRICE $49 95 

STATISTICAL PACKAGE PRICE: $24 95 

PLEASE WRITE FOR COMPLETE DESCRIPTION 

" MORE^SPECIALST 

^-CENTRONICS 739-1 PRINTER REG $995/ 
NOW $699 

^-CENTRONICS 704 PRINTER REG $2495/ 
NOW $1 795 

•K-2716S-10 95B/3FOR 9 950/10 FOR 8 BO® 
DEALER INQUIRIES INVITED 

ADO $3 00 FOR SHIPPING ON OROERS UNDER 
$100 FREE SHIPPING ON OROERS OVER $100 
NEW YORK RESIDENTS ADO 7% SALES TAX. 

W€ST€RN N€UJ YORK MICROCOMPUTeft «c 



P.O BOX 84 

EAST AMHERST NY 14051 

716/689-7344 



WHICH EDITING "SMART-TERMINAL" MONITOR ROM 
IS BEST FOR YOUR C1 P?* 





_-■ C — W-- M 




R 


7 

OM T E RM • 


? HIT basic 


C 


icro Ir.T«- 


198 1 
r t ac m 


MEMORY SIZE 7 
TERMINAL WIDTH' 

19711 BYTES FREE 

OSI 6S02 BASIC VERSION 1 

CpPYRlGHT 1977 BY MICROS 

T0 ROM-TERM HAS EDITING 
A 2-1 COLUMN OISPLAY AND 
FLOPPY DISK BOOTSTRAP 











C M 


- 


POHlfP" 


'HOEQ- 


II 


(Dl 


' Bfl', 


c 


COPVPUh' 


mi 










hicpo :ntepface 










RE ADY*I8 


NOTICE 


'ME 


*& C 


OlUMM 


3ISPIA' >0P ••*[ 


SERIES II 


Cl-P- 


SYNTAX 


EPPOP' <»PE OISPtfl'CD 1 


COPPECU ' 


ALSO 




'HEPS 


IS HEM PPOUP" 


* t nnv-* 













ROM-TERM ROM-TERM II 

FEATURES AVAILABLE ON BOTH ROMS AT THE TOUCH OF A KEY: 

• Enter 'Sir art Terminal'' mode tor communications with a time share Dial-up computer 
network 

• Select half-duplex/full-duplex operation. 

• Select auto or manual line feed at carriage return. 

• Transmit a pre-prepared memory file from C1 P to remote computer: This memory file 
can be a message letter or program and is sent at full speed — saving time and 
telephone expense. Programs can be listed to memory file while in basic 

• Receive a message or program (or all transactions! into a memory file for later review 
on video, recording on tape and printing The file can be downloaded to basic after you 
exit the "smart terminal" mode 

• Uploading/downloading of programs can be done in this memory file manner or 
directly into basic by using a new serial output distributor and a new "Control-l" load 
command. 

• Return to basic program operation at the same point of execution from which you 
entered the "smart-terminal" mode 

• "Smart-Terminal'' mode can be utilized with the modem/telephone disconnected in 
order to prepare memory files, type directly to serial printer, send memory files to printer 
or tape and to view tapes without interference from basic "Syntax Error" 

• The serial output distributor can be turned on and off with a "control S" keystroke or with 
a poke which allows easy control of a serial printer from basic. 

• Basic program lines can be recalled, edited and re-entered. The editing includes 
backspacing, forward spacing, deleting, typing over, inserting new text, and 
changing line # (duplicating a line). During editing, the cursor position and display are 
wrapped around, allowing operation on and displaying of an entire line up to 72 
characters long. The preparation of line numbered messages can utilize these features 
— extremely handy for poor spelling, typists like mel 

• Keyboard has been completely corrected to provide standard typing format. By the 
use of the control and repeat keys as modifiers, any character in the full USASCII 1 28 
character set can be entered from the keyboard. This will give you all the 
characters you need for running Pascal and other high level languages in a remote 
computer. 

• Video output may be halted at any time for easy viewing. 

• Screen clear at keystroke. 

ALL FEATURES ARE ROM RESIDENT AND ALWAYS AVAILABLE AT POWER ON. 

ADDITIONAL FEATURES PROVIDED IN THE ROM-TERM: 

• Disk bootstrap — In disk operation you can alternate between ROM Basic and Disk 
Basic with a keystroke Can Warm Start Disk Basic. 

• Easy transfer of programs between disk and ROM Basic. (Use the ROM Basic for editing 
disk basic programs.) 

• Memory files can be stored or recalled in Disk Basic, ROM Basic or the "Smart 
Terminal" interchangeably 

ADDITIONAL FEATURES PROVIDED BY ROM-TERM II: 

• A 48 column video display on series II C 1 P( Revision "D" Superboard) Selection of 48 or 
24 column video with a "Control-V" keystroke Corrected "Syntax Error" messages . 

'RECOMMEND THE ROM-TERM II FOR NON-DISK OPERATION OF SERIES II C1P (OR 
REVISION "D" SUPERBOARDI AND THE ROM-TERM FOR ALL OTHER SYSTEMS. 

ROM-TERM AND ROM-TERM II ARE A LOT MORETHAN JUST "SMARTTERMINAL" ROMS. 
THE EDITING MEMORY FILE AND OUTPUT DISTRIBUTOR FEATURES ARE INVALUABLE. 

EASY INSTALLATION. JUST PLUG INTO REGULAR C1P MONITOR ROM SOCKET 
ONLY $59.95' ORDER NOWI Check with your Local Dealer. Phone orders/Visa/MC accepted. 
Sent Postpaid on prepaid Domestic orders 

MICRO-INTERFACE 

31 1 1 SO. VALLEY VIEW BLVD., SUITE 1-1 01 

LAS VEGAS, NEVADA 89102 

Telephone: (702) 871-3263 
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You don't have to be a 
genius to figure out 
that the lowest prices 
on computers and 
peripherals are at 
The Place Where 
You Go To Buy 
Computers, inc." 






...,_ _ ;J| - 



^cippta computer 

W> Authored Dealer 

7T- 




l[. | ; i .u;i 

APPLE II PLUS APPLE WRITER EPSON 

APPLE III GRAPHICS TABLET AMDEX 

DOS 3.3 PEACHTREE ZENITH 

APPLE PLOT DC HAYES ASSOC. THE SOURCE 

APPLE PASCAL NEC VISICALC 

APPLE FORTRAN MICROSOFT VISITREND 

AUTHORIZED DEALER AND SERVICE CENTER 
■ ■■■■■■■■■■■■■■■ 

MAIL ORDER SPECIALS 

OTY. DESCRIPTION TOTAL 

EPSON MX 60 $444.99 

EPSON MX 80 F/T $574.95 

EPSON MX 100 F/T $724.95 

EPSON INTERFACE $ 79.99 

NUMERIC 24 KEY MULTIFUNCTION PAD $139.95 

NEC GREEN MONITOR 12" $219.95 

AMDEX COLOR MONITOR 13" $349.99 

ZENITH GREEN SCREEN 12" $124.95 

COOL STACK W/FAN $ 59.95 

COOL STACK WITHOUT FAN $ 32.95 

MICROSOFT RAM CARD $159.95 

MICROSOFT Z-80 CARD $284.99 

GRAPPLER INTERFACE $159.99 

GRAFTRAX 80 $ 89.99 

SUP "R" TERM $319.95 

VIDEX $279.95 

.Apple t/ider~ $ 29.95 

TO ORDER CALL Sub To,al " 

,-,..,, 7 p. TU I Mis Call!. Residents Add 6% Sales Tax 

Add t% lot shlpplnj & handling TOTAL 

Name 

Address 

City, State. Zip 

Phone 

Credit Card » 

o VISA p MASTERCARD Exp. Date 

Signature 




Just in Time For Christmas!! 

.Apple cTider™ 

Apple Slder Is the only device thast makes the 
outside of your apple as useful as the Inside. 

This versatile little unit, which plugs into the game 
I/O and attaches to the side of your APPLE allows you 
to operate in one of two modes. The first mode enables 
you to easily select between one of two devices that 
plugs into your computer (for example joysticks and 
paddles). You will never have to open your APPLE 
again to change game devices. The second mode 
enables you to take advantage of your APPLE'S ability 
to handle up to four game controllers at one time. In 
either mode cApple cJtder'" can be configured to meet 
your specif ic needs, such as exchanging the X for the Y 
axis or changing push button numbers. 

cApple cAder'" makes a great stocking stuffer, and is 
available exclusively from, "THE PLACE WHERE YOU 
CO TO BUY COMPUTERS, INC." 



ORDER NOW 



$ 



Only 



29 



95 



^^\ the place where you go to buy 

Computers N i 

m incorporated I 

"the complete communications and computer store" 

5848 Sepulveda Blvd., Van Nuys, CA 91 41 1 
(213)78-THINK 

APPLE II, APPLE III, APPLE WRITER, APPLE PLOT, APPLE PASCAL ft APPLE 
FORTRAN ARE ALL REGISTERED TRADEMARKS OF APPLE COMPUTER INC. 
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Letterbox 



Apple, OSI Readers Speak Out 

Dear Editor: 

I am an Apple user who loves to 
read computer journals — obviously 
about the Apple. 

I came very close to cancelling my 
subscription to MICRO until your 
magazine started the Apple Bonus sec- 
tion. The last two or three issues have 
been very good and I decided to con- 
tinue my subscription. 

I believe it is important to provide 
the majority of your readers with 
articles that they can use, and it is 
apparent that Apple users are in the 
majority (evidence from your poll). I 
think it is a grave error to try to cover 
too much ground because, in trying to 
please everyone, you may be able to 
satisfy no one! 

Please keep the Apple articles com- 
ing. I wish you continued success. 

Warren Ostlund, M.D. 

6616 Southcrest Drive 

Edina, MN 55435 



Dear Editor: 

MICRO #40 showed that 39% of 
your readers have OSI systems. I hope 
this will cause an increase in the num- 
bers of articles written for OSI. It would 
be nice to see 39% of the systems- 
oriented articles for OSI; after all, we 
are paying 
magazine. 



for 39% of your (our?) 



* 



Dennis W. Smith 

557 S. 10th 

Salina, KS 67401 



Editor's note: The types of articles 
we publish are directly related to the 
material we receive from our authors. 
Recently we've been inundated with 
Apple articles, but have received little 
OSI material. If you're an OSI user, 
why not try submitting a program to 



MICRO that you've developed on your 
system! We are also beginning to gener- 
alize articles so that a program can run 
on more than one system. 



Dear Editor: 

I have been trying to get more OSI 
users to flood you with articles in an ef- 
fort to prevent an Apple takeover. 
Michel Piot was afraid his English was 
not good enough for MICRO, but I con- 
vinced him to send in the article 
anyway. I'm glad to see it appeared in 
the July issue (38:79). 

I would like to see more articles of 
the type "How to convert your KIM in- 
to a Dedicated Coffee Percolator" as 
described in MICRO 36:16. A large 
fraction of your articles are being pro- 
vided by us skinflint bare-board hackers. 

I find the 6502 bibliography next to 
useless. This may have been appro- 
priate when 6502 articles were few and 
far between. And listing the contents of 
MICRO seems redundant. Perhaps the 
listings should be limited to articles 
specifically about the 6502 chip rather 
than just machines using that chip. 

Earl Morris 

3200 Washington 

Midland, MI 48640 



Editor's note: We appreciate your 
efforts to supply us with OSI material 
and authors — please continue! 

We have been working with Dr. 
Dial on shortening the Bibliography, 
but feel it is still a worthwhile depart- 
ment. Dr. Dial now includes only the 
most pertinent 6502 articles. 



Dear Editor: 

Well, you finally did it: squeezed 
OSI out of the September, 1981 issue 
entirely. But it wasn't hard to see it 
coming with "Challenges" lasting only 
four issues and the "Small Systems 
Journal" going next. Not your fault you 
say, but no attempt at a replacement. 



I have stopped subscribing to better 
magazines than yours because they let 
me down, and I'm sure the OSI adver- 
tisers in the September, 1981 issue feel 
the same way. I bet you're not surprised 
that OSI is gone from the back cover. 

Why not just change your name to 
"6809 Apple Butter" and be done with it? 

William F. Hertel 

P.O. Box 1226 

Bullhead City, AZ 86430 



Editor's note: Our September issue 
did contain an OSI article — "The Disk 
Switch," (40:15). We've scheduled an 
OSI feature for March 1982. (We also 
had an OSI feature in July 1981.) OSI 
users have not been forgotten! 



Atari Ad Attacked 

Dear Editor: 

As a 6502 expert and student of in- 
tellectual property law, I resent the im- 
plications of the Atari advertisement 
on page 17 of your October issue, and 
gladly take this opportunity to set your 
readers straight. 

Atari may not be happy with the 
fact that others have "adapted" their 
ideas to other games or computers. 
Tough! 

Unless Atari has a patent, they have 
no complaint about "adapting" or 
other use of their ideas. Copyright does 
not afford that protection. If Atari 
wants the law to be otherwise, let them 
appeal to Congress rather than attempt 
to deceive your readers. I gladly an- 
nounce to you and the "Patent Coun- 
sel" of Atari that I am freely adapting 
their ideas in programs, and will con- 
tinue to do so until they gain control. 
Suit will have to be brought in Federal 
District Court of Austin, TX. 

Jim Kirby 

502 South Park Dr. 

Austin, TX 78704 

MICRO 
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SMART II MEANS FAST. 
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SMART II MICROPROCESSOR CONTROLLED PARALLEL PRINTER INTERFACE 

Be Smart! With the new SMART II parallel printer interface for your Apple II* Computer you 
can have print spooling, left and right margin control, and adjustable tab stops. The SMART II 
can buffer over three thousand characters before it signals the Apple to stop sending. This 
eliminates the start - stop problem created with conventional printer cards and will keep your 
printer printing (instead of waiting). 

The SMART II is compatible with all known hardware and software including the Pascal 

Language System, Microsoft Z-80 Softcard*, 

and Hayes Micromodem II*. available at your local apple dealer 



FEATURES: 

Compatible with all Centronics-type Parallel printers 
including the Epson MX-70/80/100, Centronics 737/739/779, 
IDS 440/445/460/560, C Itoh Starwriter, Anadex 
8000/9000/9500, and similar printers. 
3K Print Spooler which acts much larger when spooling 
text because of a unique compaction routine. 
On board software supports typewriterlike TAB Com- 
mands and has 16 software selectable TAB positions. Left 
and right margin commands are also software selectable to 
ease in the justification of reports and listings 
Use with the Hayes Micromodem II* to prevent loss of 
characters while on line with a host computer. 



INTRODUCTORY 
RETAIL PRICE 



$225. 



(cable and 
connector 
included) 



• Apple is a registered trademark of Appie Computer, Inc. 

• Z-80 Soltcard is a registered trademark ot Microsott. 

• Micromodem II is a registered trademark ol Hayes. Inc. 



HARDWARE: 6800 type microprocessor 
Two ROMs 
Six static RAMs 
Eight support ICs 
4 ft printer cable and connector 
High quality board with gold plated 
edge connector 



OLENSKY BROS., INC. 

COMPUTER SALES DIVISION 

3763 AIRPORT BLVD. 
MOBILE, AL 36608 

TOLL FREE: 800-633-1636 

DEALER INQUIRIES INVITED. 
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DATA CAPTURE 4.0° 

The most advanced and easiest to use telecommunications program for use 
with the MICROMODEM II® or the Apple COMMUNICATIONS CARD®. 



If you use your Apple If* 1 computer to communicate with other Apples or with timesharing systems, then you need Data Capture 4.0. 

If you want to save stock quotes, airline schedules, electronic mail, or other data from a remote computer system for future use, 
then you need a smart terminal program for your Apple II"". Data Capture 4.0 is the most user friendly and most flexible program of 
this type. It is specifically designed to take advantage of all the features of the Micromodem 11^, but it works equally well with the Apple 
Communications Card"" and several other popular serial 
interface cards. 

Data Capture 4.0 is the only Apple It® smart terminal 
program available which is fully copyable and modifiable. 
This means that you don't have to worry about backup. 
Go ahead and make all the backup copies you need. 

The unprotected format and helpful documentation 
make modifications to Data Capture 4.0 very easy to 
perform. In addition, full technical support is available by 
phone from Southeastern Software. 

Data Capture 4.0 has many other features. Incoming 
data files are automatically captured regardless of length. 
Data in the memory buffer can be viewed, edited, printed, 
saved to or loaded from disk, or transmitted to the remote 
system at any time. An unattended mode of operation is 
provided so that you can call your Apple from another 
location and send data to it or load data from it. Data 
Capture 4.0 is fully compatible with the Apple III s * in 



Select One Of The Following 
A) wait Call 
C) alalogDisk 
O) eleteText 
E) nter Phone Number 
H) angup Phone 
I) nsert Text 
L) ist Text 
M) erge From File 
PJnntText 
Q) uil Program 
S) end Text 
T) oggle 

A|lternate Drive (t/2| 

B)aud Rate (110/300) 

Oapture (ON/OFF) 

Dluplex (FULL/HALF) 

L) ocal Carrier (ON/OFF) 

S) pecial Characters (0N/OFFI 

T) ransmit 
W) rile To File mmmmmm 

Which '( Press g ^lo Abort 



Drive = 1 
Lines = 15 
Baud = 300 



Capture ON 
Sp Char HJ 



Data Capture 4.0 



Transmit ON 

Duplex 

Carrier 



Terminal = 

@C123 45 

XYZ-Network Connected 
Please Sign-on 
HDABC123 

Welcome to the XYZ-Network 

Time on 12:35:41 

» 



Requires DISK lr», Applesoft lr® and 48K of Memory 
DATA CAPTURE 4.0© 1980-Southeastem Software 

"Apple**. Apple II Plus", Disk If and APPLESOFT If are trademarks ot Apple 

Computer Company 

SOURCE - Source Telecomputing Corporation 
■Micromodem-* re a trademark ol DC Hayes Associates. Inc. 



emulation mode. It is also compatible with all popular 
lower case adapters for the Apple IP*, including the widely 
used shift key modification. An automatic logon utility for 
use with the SOURCE is provided with Data Capture 4.0. 
Also included is a HELP text file containing the latest tips 
and suggestions on using Data Capture 4.0 effectively 
(many of these are the result of feedback from customers). 

See your local Apple dealer today for a demonstration 
of Data Capture 4.0 or order direct from Southeastern 
Software at the address below. 

(Please include $2.50 for postage and handling.) 

If you presently own a previous version of Data Capture 
you may upgrade to the new version for the difference in 
price plus $2.50 for postage and handling. MASTER CARD 
or VISA orders may be placed by phone. 

DATA CAPTURE 4.0 $65.00 

DATA CAPTURE 4.0 / 80" $90.00 

"Specify either Videx, Smarterm, Double Vision or 
Sup 'R' Terminal version 

— Dealer Inquiries Invited — 



Southeastern Software 

641 4 Derbyshire Drive • New Orleans. 'Louisiana 701 26 
(504) 246-8438 or (504) 246-7937 



master charge ■ 
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PET/CBM 

2000/3000/4000 Series 

noc using a CRT, or display controller chip 
$275.00* 



Select either 
SO x BG or aa x 25 



On The 
Built-in 
Display 



From the keyboard or program 

Displays the full, original character set 

Available from your local dealer or: 
EXECOM CORP. 

1901 Polaris Ave. 
Racine. Wl 53404 
Ph. 41 4-632-1004 

*Plus installation charge of S~75.00 



Available only for Basic 3.0 S Basic 4.0 

PETS CBM"fe 

trademark of Commodore Business Machines 



SUPER 
SKETCH 



THE ULTIMATE 
GRAPHICS PROGRAM 

* KEYBOARD OR 
PADDLE CONTROL 

« DRAW ALPHA-NUMERICS 

OP ANY SIZE. COLOR OR ANGLE 

* KERGE ANY HI-RES 
PICTURES TOGETHER 

* CREATE AND SAVE SLIDE SHOWS 

* MOVE ENTIRE 

HI-RES PICTURES ANYWHERE 
ON THE SCREEN 

* APPLE 11+ l;8K DISK 



; 



TO ORDER: SEND $2'l.95 TO 

JAY ROSENBERG'S SUPER SKETCH 
5 FRASER AVE. 
KONTICELLO. N.Y. 12701 
N.Y.S. RESIDENTS ADD 7» SALES TAX 



(LABEL), Y (LABEL,X) LABEL + /NDX-J 



6502 Assembler/Editor 



APPLE 

ATARI 

PET 



SYM 



Before you buy that off-brand Assembler/Text Editor, note that EHS is the only company that provides a | 
line of compatible ASM/TED's for the PET/APPLE/ATARI/SYM/KIM and other microcomputers. 
I When you make the transition from one of these 6502-based microcomputers to another, you no longer] 
[have to relearn peculiar Syntax's, pseudo ops, and commands. Not only that, EHS ASM/TED's are the 
[only resident 6502 Macro Assemblers available and they have been available for several years. Thus you 
lean be sure they work. Our ASM/TED's may cost a little more but do the others provide these powerful 
features: Macros, Conditional Assembly, String Search and Replace, or even up to 31 characters per label? | 
Before you spend your money on that other ASM/TED, write for our free detailed spec sheet. 



MACRO ASM/TED 

For APPLE/ATARI/PET/SYM/KIM 
Other than our MAE, no other assembler 
is as powerful. 

Macros/Conditional Assembly. 
Extensive text editing features 
Long Labels 

Designed for Cassette -based systems. 
, $49.95 



MAE ASM/TED 

For APPLE/ATARI/PET 
The most powerful ASM/TED 
Macros/Conditional and Interactive Assembly 
Extensive text editing features 
Long Labels 
Control files 

Designed for Disk-based Systems. 
$169.95 



VISA' 



EASTERN HOUSE SOFTWARE 

3239 Linda Drive PHONE ORDERS 

Winston-Salem, N. C. 27106 USA (919)924-2889 
(Dealer Inquiries Invited) (919) 748-8446 




i 
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PET Viet 



By Loren Wright 



Compiled vs. Interpreted 



Alternate Languages for the PET 

It seems we have been deluged in the 
past year by alternative languages for 
the PET, all purporting to be better 
than BASIC in one or more important 
ways. Currently on the market are 
compiled BASICS, the extended Water- 
loo MicroBASIC (interpreted) for the 
SuperPET, at least two Pascal versions, 
and several versions of FORTH. In ad- 
dition, there are non-standard lan- 
guages which combine the features, ad- 
vantages, and disadvantages of the 
better- known languages, and add some 
of their own. 

Next month we'll focus on Pascal. 
The three-month "Pascal Tutorial" 
series by Victor Fricke concludes, and 
will be accompanied by several other 
articles to help you learn more about 
Pascal, its inner workings, and some 
applications. The PET Vet column will 
survey the available Pascals for the 
PET. The February issue will feature 
FORTH, and I hope to survey the PET 
FORTHs then. 

Now let's take a look at why there 
is a need for all these other languages, 
what kinds of improvements they make, 
and what sacrifices are necessary. 



What's Wrong with BASIC? 

BASIC is inadequate in several areas: 

1. It is too slow for many applications. 
Therefore, programmers must re- 
sort to writing machine language, 
which can be very difficult and time 
consuming. 

2. It occupies too much memory, 
reducing the size of programs that 
can be executed. 

3. It is often difficult to understand a 
BASIC listing. The necessary com- 
ments consume memory and slow 
execution speed, so they are often 
omitted. 



BASIC is an interpreted language. 
Your BASIC program is analyzed by a 
program called an interpreter, which 
occupies most of your PET's BASIC 
ROMs. As each instruction in the 
BASIC program is encountered, it must 
first be recognized and then executed 
using a particular prepackaged routine 
to perform that function. It doesn't 
matter how many times that instruc- 
tion has been encountered before; it 
must still be interpreted before it is ex- 
ecuted. You can see that a lot of time 
gets wasted in this redundancy. Also, it 
means that the BASIC program must be 
in memory in order to be interpreted. 

Compiled languages require an ad- 
ditional step before you can run your 
program. The source statements must 
be reduced to executable machine code 
by a program called a compiler. Then 
this reduced program may be executed 



directly. The source and the compiler 
are now dispensable, and the memory 
they occupied during compilation is 
available for other uses. However, if 
you need to make changes, you must go 
back to the source program, make the 
necessary changes, and recompile be- 
fore you can execute the new version. 

Microcomputer implementations of 
Pascal take an "in between" approach. 
The source statements are compiled to 
a reduced form called P-code ("P" for 
pseudo). This P-code is then inter- 
preted by the "P-machine," (which is 
really another program). This can 
operate faster and more efficiently 
because of the reduced form of the pro- 
gram. The P-code itself is not directly 
executable by the 6502. In both purely 
compiled and P-code languages, the 
source program does not have to be in 
memory when execution takes place. 



4. It is not a "structured" language. 
Such features as global vs. local 
variables, named procedures, long 
variable names, and a logical pro- 
gram flow are quite foreign to most 
BASICs. Structured programs take 
longer to write, but the results pay 
off in a number of ways. 

5. Although BASIC is a "universal 
language," the implementations of 
it are different. In other words, you 
can't just type into your PET a pro- 
gram that was written for another 
computer, without knowing a lot 
about that other BASIC dialect. 

6. BASIC encourages sloppy program- 
ming with its convenience and lack 
of structure. 



Of course there's a lot right with 
BASIC. The biggest advantage is that it 
comes with most microcomputers. 
Communication with peripheral 
devices and screen editing are usually 
much more difficult in the alternate 
languages. Everyone knows some BASIC, 
even if it's a slightly different dialect. 



BASIC is also easy to learn, and BASIC 
programs are easy to debug. The fact 
that it's so easy is reason enough to ap- 
ply it in most situations. So if you 
aren't bothered significantly by any of 
the above "BASIC problems," by all 
means stay with BASIC. 

Several of the alternate languages 
improve speed, consume less memory, 
and allow convenient manipulation of 
memory contents, but usually are more 
difficult to write and read. VIGIL, 
reviewed here in August, is such a 
language, oriented toward easy manip- 
ulation of graphics in game applica- 
tions. FORTH is another, employing a 
threaded structure and a user stack. I'll 
begin my coverage of alternate lan- 
guages with RPL, a new language de- 
signed to compete with FORTH. 

RPL — from Samurai Software 

RPL stands for Reverse Polish 
Language, as some of you may have 
suspected. It refers to the sort of 
backward notation used not only in 
this language, but also on Hewlett- 
Packard calculators and in FORTH. 
The key feature to all of these is the 
{Continued on page 104) 
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FOCUS 



ON THE 6809 MICRO 
WORTH SWITCHING FOR 



H 



FOCUS ... on its 

SUPERIOR HARDWARE 



6809E Microprocessor provides 8-bit economy with 16-bit 

capabilities, position Independent code and many advanced 

features 

Commercial quality Keyboard with full UPPER/lower case 

ASCII, numeric keypad and cursor control keys 

Two double sided, double density mini diskettes 

with 640K bytes of IBM compatible storage 

Full Video with programmable screen formats, bit mapped 

graphics, user definable character sets, reverse video and 

hardware scrolling, plus a light pen interface 

Full Communications support for RS-232 at 50 to 19.2K 

baud with programmable data formats 

Built-in I/O Drivers include 6 parallel I/O ports, 3 serial I/O 

ports, 6 timers/counters, 20 mA current loop, and a 

programmable cassette Interface 



FOCUS ... onus 

EXTRAORDINARY SOFTWARE 



Choice of two 'Universal' 6809 Disk Operating Systems 
supported by many companies: FLEX ™ or OS-9™ 

Extended Floating Point Disk BASIC 

Interpreted and Compiled 
Text Editor and Macro Assembler 
Full feature MIcroMon debugging monitor 
Built-in Word Processor 



FOCUS ... on its 

VERSATILE EXPANDABILITY 



IEEE-488 Bus Controller option for instrumentation 

Supports multiple 8" diskette drives 

PASCAL, FORTH and other high level programming 

languages are available 

Complete Application Packages are available from many 

software sources 

Add-on Hardware includes: Date/Time, Opto-lsolators, 

Stepper-Motor Controller, A/D and D/A, RAM and EPROM 

Memory, and others from several manufacturers 



FOCUS ... ON YOUR 

APPLICATION REQUIREMENTS 



FOCUS provides a completely integrated system of 
hardware and software, so that you can concentrate on 
your application requirements 

FLEX is a trademark of Technical Systems Consultants 
OS-9 is a trademark of Microware Systems Corporation 
FOCUS is a trademark of The Computerist, Inc. 



THIS IS 

FOCUS 




Very CompIete 



ffij@ 
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34 Chelmsford Street 

Chelmsford, MA 01824 

Phone: 617/256-3649 Telex: 955318 INTL DIV 




^■^1. 
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O 



SEC 

Microcomputer 




PC-8001A 32K Computer CALL 

PC-8012A I/O Unit w/32K RAM CALL 

PC-8013A Dual Mini-Disk Drive Unit CALL 

PC-8001MulllCardware(FDI/O&32K) CALL 

CP/M 2.2 Operating System lor NEC 129 

WordStar configured (or NEC 299 

SuperCale configured for NEC 279 

NEC Wordprocessor & Accounting Software CALL 

Many more software packages and languages: 

(Pascal. Fortran, Cobol. etc) are available configured foi 

■he NEC 8001A Computer. 

Please call or write for a product price list. 



ATARI 
800 
16K 



$749 



Atari 400 W/16K 349 

410 Program Recorder 65 

810 Disk Drive 449 

825 80 col. 7*8 Dot matrix Impact printer 699 

822 40 col. Quiet Thermal Printer 349 

850 Interface Module 1 59 

Atari 16K Ram Module 69 

Axlon Ramcram 32K Module 189 




Video Monitors 

Amdek/Leedex Video 100 12" B&W 155 

Amdek/Leedex Video 100G 1 2" Green Phospher . . .179 

Amdek (Hitachi) 1 3" Coloi w /audio output 389 

NEC IT Green Phosphei Display JB-120IM CALL 

NEC 12~ Lo-Res Color Display CALL 

NEC 1 2" Hi-Res RGB Color Display CALL 

Sanyo 9" B«W Display 185 

Sanyo 9" Green Phospher Display CALL 

Sanyo 12" B&W Display 269 

Sanyo 12" Green Phospher Display 285 

Sanyo 13" Color Display 449 

Zenith 12" Green Phospher Display ZVM-121 ...... 149 




ZENITH 

12" 
GREEN 



$149 



VIC20 



$259 



Personal 

Computer 

Color ' Sound " Graphics 

Call or write for more info. 

Disk drives available soon! 




•Mappkz computer 

^^r- Authorized Dealer 






APPLE il PLUS 

16K NOW $1025 
48K NOW $1089 

64K # now $1199 

'48K Apple wilh 16K RamBoard 

APPLE DESK 
DRIVES 

$439 

w/ controller and DOS 3.3 $4 99 
Apple Cards and Hardware 

Language System •»/ Pascal ft BASICS 379 

Sllentype Printer w/lnferf see card 349 

Hayes Micromodcns II 299 

Novation Apple-Cat 339 

Vldex Vldeoterm 80 column card 269 

Vldex Keyboard Enhancer IIS 

2-80 Sof tcard by Microsoft 299 

16 KRamCard by Microsoft 169 

CPS Multi-function card 189 

Software for the Apple 

VlslCalc version 3.3 159 

VlslFlle (NEW data base manager) 199 

VlsiTrend/ VtalPlot 219 

DB Master 169 

WordStar (Apple 80 col. version) 249 

Dow Jones Portfolio Evaluator 45 

Apple Poet 45 

Apple Writer 65 

Dow Jones News ft Quotes Reporter 85 

Apple Plot 60 

Tax Preparer 99 

Real Estate Analyz er ■ ._. . 129 

16K RAMBOARD b v ConComp 
for Apple II Computers 

$1 2Q 95 

FOR ONLY A JErf —# 




AVAILABLE NOW 




S-100 

California Computer 
Systems 

Floppy Disk Controller S369 

64K Dynamic Ram Board, 200ns $499 
Z-80 CPU board w/ monitor ROM S269 

16K Static memory board, 200ns 369 

32K Static memory boatd, 200ns 599 

S-100 12 Slot Mainframe 475 

4-Port Serial Interlace 299 

2-Port Serlal/2-Port Parallel Interface 299 

4-Port Parallel Interface 229 

Printers 
Silentype 

w/ Apple II Interface 

$349 

Epson 
MX-80 or 
MX-80 FT 

CALL 

Anadex 9501 w/2K Buffer 1349 

C. Itoh Starwriter 25 CPS dalsywheel 1449 

C. Iioh Starwriter 45 CPS dalsywheel 1649 

Epson MX-70 CALL 

Epson MX-80 ft MX-80 F/T CALL 

Epson MX- 1 00 CALL 

NEC 8023 Impact Dot Matrix 695 

NEC Spinwriters (Latest models) CALL 

Paper Tiger IDS-445G w /graphics 699 

Paper Tiger IDS-460G w/graphlcs 949 

Paper Tiger IDS-560G w/graphlcs. 1249 

Sllentype Printer w/Apple interface 349 

Qume Sprint Dalsywheels (Latest models) CALL 

ORDER TOLL FREE 

800-854-6654 

In California and 
outside continental U.S. 

(714) 698-8088 

Telex 695-000 Beta CCMO 




Send Orders To: 



Ordering information Phone aiders using VISA. MASTERCARD. 
AMERICAN EXPRESS. DINER'S CLUB CARTE BLANCHE, bank 
wire transfer cashier'* or teitilicd check, money order, or personal 
check (allow ten days to clear) Unless prepaid with cash, pleas* add 
5% for shipping, handling and insurance (minimum 5 00) Calif 01 
nia residents add b'h sales la> We accepl CODs OEM's. Instil ulion* 
and corporations please send (or a wnlien quolfllton All equipmeni 
is subject lo price change and availability without notice All equip 
men! is new and complete with manufacturer"* wortanty (usually 90 
days) Showroom prices may drfler from mail order prices 



Mail Order 



8314 Parkway Drive 
La Mesa, Calif. 92041 
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Microbes 
and Updates 



Dear MICRO: 

The utility program "Binary File 
Parameter List," by Clyde R. Camp 
(MICRO 38:45) produces an incorrect 
count of free sectors when used with 
DOS 3.3. The reason is the final state- 
ment in line 1500: V = INT (V/2). This 
drops the least significant bit in the 
two-byte map for each track, so that 
sector is never counted. I have made a 
small change in line 1500 and added 
line 1505 to correct this (see below). 

1500 FOR I = 56 TO 195 

STEP 4: S = PEEK (BASE 
+ I) * 256 + PEEK (BASE 
+ I + 1):V = INT (8/ 2) 

1505 IF S / 2 < > NT(S 12) 
THEN CNT = CNT + 1 

J. Morris Prosser 

3157 Indian Village Rd. 

Pebble Beach, CA 93953 
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Dear MICRO: 

I received the October issue of 
MICRO today containing my article 
"Solar System Simulation, Part 2," 
(41:108). I found one error in a DATA 
statement. Three values were dupli- 
cated. Below is the correct version of 
line 3330. 



15,57,-22, -29,16,3, 
- 19,-40,16,18,-25, 
-28,16,28,-26,-19,16, 
33,-28,-7,16,47,-34, 
-12.16,48,-37,-58,16, 
50,-42,-17 



Dave Partyka 

1707 N. Nantuckett Dr. 

Lorain, OH 44053 
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Dear MICRO: 

I have just been re-reading my arti- 
cle "Interfacing Two 12-Bit A/D Con- 
verters to an AIM" (41:100) and I have 
noticed an error. In listing 2, the BASIC 
line 30 has been changed from X = 
USR(N), in my original text, to M = 
USR(N). This does not make any par- 
ticular difference to operation, but in 



the text on page 105, second paragraph 
under BASIC Program, the sentence 
"The assignment of a value to X 
here..." would need to read, "The 
assignment of a value to M here..." to 
correspond. 

G. Roger Heal 

University of Salford 

Salford M5 4WT, 

Lancashire, England 



Dear MICRO: 

The program listing in "Sorting 
with Applesoft," by Norman P. Herz- 
berg (MICRO 39:92) contains several 
errors. The corrected lines are: 

750 TEMP = R(J):R(S(J)) = 
TEMP:R(J) = J:S(TEMP) = 
S(J):S(J) = J 

2000 REM SORT 

5050 DATA 169,76,141,245,3, 
169,58,141,246,3,169,3, 
141,247,3,96,32,227,223, 
133,133,132,134,32,190, 
222,32,227,223,160,2, 
177,133,72,177,131,145, 
133,104,145,131,136,16, 
243,96,0 

J.C. Shellenbarger 

1 181 S. Sunkist St., Apt. 20 

Anaheim, CA 92806 



Dear MICRO: 


JLIST ie3e 




1030 60SUB 1325:N = N + 0E 


In regard to the September issue, 




Clement Osborne's "Shaper" is fan- 




tastic. I tried several others and even 


1LIST 1180 


wrote my own, but this beats all. 


1180 TEXT : POKE 34,5: S = 0E: GOTO 1050 


Here are a couple of additives which 
helped me through it, but they're not 


1LIST 1325,1330 


necessary for operation. 


1325 UTOB 1: HTPB 1: PRINT "0-MOUE UP 4-PLOT % N0UE UP 1-M0U 




E RIGHT 5-PLOT «, HO'JE RIGHT 2-MOUE DOWN 6-PLOT ?. H0UE D0H 




N 3-HOUE LEFT 7-PLOT S, M0UE LEFT" 


David L. Angell 


1330 POKE 34.5: UTflB 24: RETURN 


18Fairview Ave. 




Cranston, RI 02905 


1LI3T 6030,6032 




E030 PRINT : PRINT "IIHPT IS THE STORTING LOCATION OF T06LE ": PRINT : PRINT 




"CIF THEN OECIMRL LOCATION IS 24567. V: PRINT : INPUT " IN DEC 




I NHL -> ";3L 




6032 PRINT : PRINT "DOUBLE CHECK STORTING LOCATION ' ": PRINT : INPUT "IS 




IT CORRECT ? ";fit: IF LEFT* <0J»0E) < > "V" GOTO 6030 
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Dear MICRO: 

I was very pleased to see my article 
"Monobyte Checksum Dumper" printed 
in the July issue of MICRO (38:67). 

A few remarks, or corrections: 

Listing 1: 1E2C C904 CMP #$04 
should read 1E2C E004 CPX #$04. 

The missing part of listing 1 was 
already corrected in Microbes and Up- 
dates (40:93). Here are the lines omit- 
ted from listing 2: 

Peter D. H. Broers 

Overijsselstraat 9 

5144 EH Waalwijk, Netherlands 



JUCftO 



Get more from your 
microcomputer. 



State-of-the-art hardware and 
software articles in MICRO help you 

• Understand your computer's 
inner workings 

• Keep up with high-level 
language developments 

• Exploit the full capabilities 
of your microcomputer 

Read the monthly lhal thousands o( profes- 
sionals use to get the most out of their 
Apple, Atari, AIM, PET, 0S1, or other 
6502-or 6809-based system. $18 in U.S. 
(S21 elsewhere). 

CALL TOLL-FREE " i 

800-227-1617, at. 564 

(in Calif: 800-772-3545, ext. 564) 

/MCftO 

34 Chelmsford St. 
P.O. Box 6502 
Chelmsford, 
MA 01824 




Broers' Listing 2 








1F69 18 


AECHCK 


CLC , 


ADD THE BYTE TO THE CHECKSUM 


1F6A 65E6 




ADC CHCK 




1F6C 85E6 




STA CHCK 




1P6E 9002 




ECC *+4 




1F70 E6E7 




INC CHCK+1 




1F72 60 




RTS 




1F73 


• 






1F73 208A1F 


ADRTM 


JSR DIGIN 


GET 2 HEX DIGITS 


1F76 OR 




ASL 


AND CALCULATE BYTE, STORING IT 


1F77 OA 




ASL 


IN LOCATION "ADRES+Y" 


1F78 OA 




ASL 




1F79 OA 




ASL 




1F7A 99E0O0 




STA ADBES.Y 




1F7D 208A1F 




JSR DIGIN 




1F80 19E000 




ORA ADRES.Y 




1F83 99ECO0 




STA ADRES.Y 




1F86 88 




DEY 




1F87 10EA 




BPL ADRIN 


REDO FOR Y+l BYTES 


1F89 60 




RTS 




1F8A 


; 






1F8A 20EBFF 


DIGIN 


JSR BYTIN 


GET ONE HEX DIGIT 


1F8D 20EEFF 




JSR BYTOUT 


DISPLAY IT 


1F90 2093FE 




JSR $FE93 


TEST IT FOR VALID HEX AND MAKE BINARY 


1F93 30F5 




BMI DIGIN 


0-15. IF NOT VALID, REDO. 


1F95 60 




RTS 




1F96 








1F96 AOFF 


PRMPTS 


LDY #$FF 


MESSAGE PRINTER "PROMPTS" 


1F98 C8 


PLOOPA 


INY 


FIND MESSAGE NR. X 


1F99 B9AE1F 




LDA MESSAG, Y 




1F9C DOFA 




BNE PLOOPA 




1F9E CA 




DEX 




1F9F D0F7 




BNE PLOOPA 




1FA1 C8 


PLCOPB 


INY 


AND PRINT (& SAVE?) 


1FA2 B9AE1F 




LDA MESSAG.Y 




1FA5 F006 




BEO RETURN 




1FA7 20EEFF 




JSR BYTOUT 




1FAA 4CA11F 




JMP PLCOPB 




1FAD 60 


RETURN 


RTS 




1FAE 








1FAE 00 


MESSAG 


BYT 00 


MESSAGE 


1FAF 


j 






1FAF 455252 


MESSA 


ASC 'ERROR << HIT G' 


; ERROR MESSAGE 


1FB2 4F5220 








1FB5 3C3C20 








1FB8 484954 








1FBB 2047 








1FBD 00 




BYT 00 


;DURING THE LOADING 


1FBE 








1FBE OAOD 


MESSB 


HEX OAOD 


-MESSAGE 2— MESSAGE WHEN 


1FC0 445 54D 




ASC 'DUMP B/M' 


•STARTING THE DUMPER 


1FC3 502042 








1FC6 2F4D 








1FC8 00 




BYT 00 




1FC9 


j 






1FC9 OAOD 


MESSC 


HEX OAOD 


J MESSAGE 3 — ASKING FOR 


1FCB 465253 




ASC 'frst/last/auto? 


' ;THE ADDRESSSES 


1FCE 542F4C 








1FD1 415354 








1FD4 2F4155 








1FD7 544F3F 








1FCA OAOD 




HEX OAOD 




1FCC 00 




BYT 00 




1FDD 


; 






1FDD OAOD 


MESSD 


HEX OAOD 


iMESSAGE 4— ASKING FOR A "Y" 


1FDF 524541 




ASC 'READY ?' 


;WHEN READY TO DUMP 


1FE2 445920 








1FE5 3F 








1FE6 00 




BYT 00 




1FE7 OAOD 


MESSE 


HEX OAOD 


;MESSAGE5 — LOADER START 


1FE9 062E31 




STR ' .1F00/' 




1FEC 463030 








1FEF 2F 








1FF0 00 




BYT 00 




1FF1 








1FF1 2E3146 


MESSF 


ASC ' .1F00G' 


; MESSAGE 6— LOADER AUTOSTART 


1FF4 303047 








1FF7 00 




BYT 00 




1FF8 








1FF8 OD 


MESSG 


HEX OD 


.-MESSAGE 7 — BASIC POINTER 


1FF9 2E3030 




ASC • .0079/' 




1FFC 37392F 








1FFF 00 




BYT 00 




2000 


; 
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NOW AVAILABLE! 



IN DEPTH 

AT SELECTIVE APPLE DEALERS 
WORLD-WIDE 



136 pages of timeless 
reference material on 
heavy duty stock. 

• APPLESOFT FROM 
BOTTOM TO TOP 

• APPLESOFT 
INTERNALS 

• PROGRAM 
SPLITTER 

• AMPLIFYING 
APPLESOFT 

• HI-RES NOTES 

• and more 



Call -A£ PX - E " 
lnI>e^»'» , 



57 



^^OCanadal 



No. » 



AH 
About 

Applesoft 



A CALL 



^P'-^LESi 



Exchange 



Dealer Inquiries Invited 

Membership and dealer information: 

Apple Pugetsound Program Library Exchange 

304 Main Ave. S., Suite 300-M 

Renton, WA 98055 

(206) 271-4514 



A TEAM OF 6809 SUPERSTARS: 

Smoke Signal's Chieftain™ Computer, 
and Software by Micro ware 





HERE'S THE TOTAL 6809-BASED SYSTEM FOR THOSE WHO DEMAND 
UNSURPASSED POWER, FLEXIBILITY AND RELIABILITY 



After years of worldwide use in diverse and challenging appli- 
cations, the outstanding performers in 6809 computer opera- 
tions are SMOKE SIGMAL and MICROWARE. These leading 
companies are recognized as the undisputed choices when 
there is no room for compromises. 

WHY SMOKE SIGNAL AND MICROWARE LEAD 

THE 6809 FIELD 

Smoke Signal began pioneering research and development on 
6800/6809-based computer systems back in 1977. Microware 
worked three years to perfect OS-9™ and BASIC09.™ 

Both companies have evolved outstanding 6809-based 
products from early engineering research, and both pay 
almost fanatical attention to detail, for example . . . 

SMOKE SIGMAL'S 6809-based Chieftain™ computer series has 
proven its superiority in hundreds of demanding tasks. From 
gold-plated connectors to highest-quality materials throughout, 
each Chieftain™ is built to deliver absolute dependability from 
day one, and stay that way through years of service. 



Every Chieftain™ is meticulously 
ENDURANCE-CERTIFIED at 2.2 MHz. 
That's SMOKE SIGNAL'S endorse- 
ment of product perfection. 



MICROWARE's state-of-the-art OS-9 UNIX'-like operating system 
and the BASIC09 language have been developed in close 
coordination with computer manufacturers to maximize 
optimum system performance. The finest possible support and 

•UNIX is a trademark of Bell Telephone Laboratories. 





SMOKE SIGNAL 
BROADCASTING 



MICROWAR6 

P.O. Box 486! 

Dps Moines, lain M.W4 



31336 VIA COLINAS 
WESTLAKE VILLAGE, CA 91362 
TEL (213) 889-9340 



documentation further ensure satisfaction. Microware software 
performance is best summed up in this remark by a 25-year 
computer veteran: 

"fl4S/C09 IS THE FINEST HIGH-LEVEL LANGUAGE IVE EVER 
SEEN IN THE INDUSTRY!" 

Thousands of engineers and programmers use MICROWARE 
software products as their standard time-saving tool ... to 
execute process-control applications . . . and for other vital 
functions. COBOL and PASCAL are also available under the 
OS-9 operating system. 

HOW THIS REMARKABLE TEAM OF COMPUTER 
SUPERSTARS CAN SERVE YOU 

SMOKE SIGMAL's Chieftain™ computer provides an array of 
configurations ranging from 5'/«-inch drives for single-user 
applications to multi-user, multi-tasking capabilities, Winchester 
hard-disk drive systems are also available. 

In other words, breathtaking power with as little as 48k 
memory; Microware's OS-9 Level Two can access up to one full 
megabyte that your Chieftain™ can address! 

One more sampling of the awesome processing potential 
at your fingertips with the Smoke Signal Chieftain™ computer: 

MICROWARE'S Stylograph screen-oriented word processing 
package instantly makes Chieftain™ an easy-to-use document 
preparation system with comprehensive editing commands. 

THERE'S MUCH. MUCH MORE! Call or write SMOKE SIGNAL 
for details on Chieftain™ computers and MICROWARE software. 

SMOKE SIGNAL Dealer opportunities are still available . . . 
please request information. 



□ Send information about Chieftain 
and Microware software. 



computers 
□ Provide information about Smoke Signal's Dealer program. 



Name . 



Address. 
City 



. State- 



.Zip 



Telephone 



Why you need The Inspector. 



If you're serious about programming, you need 
to set all your utilities together in one place — 
inside your Apple. The Inspector comes on an 
Eprom that simply plugs into the D8 socket, or on 
a disk ready to merge with Integer Basic for 
automatic loading on boot. Either way, it stays at 
your fingertips, ready to call without disturbing 
your current program. 

The Inspector puts you in total control of both 
memory and disks. You can search forward 
and backwards, edit, read nibbles, 
map disk space, dump the screen 
to a printer, examine every secret 
of your Apple. Use The Inspector 
to repair blown disks, undelete 
files, input "illegal" commands, 




read and alter files, locate strings in memory or on 
disk. The uses are endless. The manual, alone, is an 
education. And it's always there when you need it. 

You need the most powerful disk and memory 
utility available for your Apple. You need the 
Inspector. 

See your local dealer, or order direct for just 
$49-95. Mastercard and Visa holders order 
toll-free, 1-800-835-2246. 

OMEGA MJCROWARE,INC. 

222 SO. RIVERSIDE PLAZA 

CHICAGO, IL 60606 

312-648-1944 



Apple is a registered trademark of Apple Computer. Inc 



Your /I pple too slow ? 
Not anymore... 



Now you too con wrire 6809 programs for your Apple II thot ore 
DOS 3.3 compotible. Bur you don'r hove to srop rhere, you con 
also program your Apple It's 6502 ond the 660° of THE MILL ro run 
SIMULTANEOUSLY. 

THE ASSEMBLER DEVELOPMENT KIT including THE MILL is o full 
feorure assembler, designed ro use the rexr ediring system of your 
choice The sysrem will also boosr your computer programming 
productivity, since the 6609 is today's easy to learn and program 
computer. Take advantage of rhe 8-bir 6502 ond rhe 16-bit 
abilities of the 6809 running or the some time, creore your own 
MULTIPROCESSING ENVIRONMENT on rhe Apple II. 

Pur THE MILL inro your Apple II and get power, performance and 
price matched by no other personal computer. STELLATION TWO 
offers a full 1 year warronry ond o 60 day money bock guoranree. 
if you're nor completely sorisfied wirh rhe power of THE MILL. 

Shop oround. then compare the service, quality, price and 
power of THE MILL. Toke this ad to your local Apple Dealer ond see 
the endless possibilities of adding THE MILL to your Apple II. 





THE MILL rransforms rhe 8-bir Apple II 
into o computer that acts like a 
1 6-bit machine. THE MILL hos 
unique hardware features that 
permit the 6809 to run or full 
speed C 1 megahertz) and 
allow rhe 6502 ro run or 
20% of its normol 
speed — 
ATTHE SAME TIME! 



Find out abour 
THE MILL and get 
involved with the 
hottest item on rhe 
personal computer 

marker today 
No existing personal compurer 
can give you the power, 
performance ond price of THE MILL'S 

6809-6502 combination. 



PO. BOX 2342 -N6 

SANTA BARBARA, CA. 93120 

(805)966-1140 



Apple II 
is a trademark 
for Apple Compurer. Inc. 



v 
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/AIGftO^ 

From Here to Atari 



James Capparell 

297 Missouri 

San Francisco, California 94107 



Last month I showed you how to use 
the Load Memory Scan (LMS) instruc- 
tion of the display list to effect a scroll- 
ing screen. Recall that the display list is 
the set of instructions used to control 
an LSI chip called ANTIC. ANTIC, a 
dumb microprocessor, functions as a 
graphics controller. Its principle func- 
tions are to specify the location in 
memory to be displayed, the mode of 
display (14 graphics/text modes with 
differing resolutions to choose from), 
horizontal /vertical scroll enable (dis- 
cussed last month) and display list in- 
struction interrupt enable. 

This month I've included an AN- 
TIC disassembler. This program re- 
quires you to enter a BASIC graphics 
mode numbered - 8, and will then 
locate the associated display list and 
decode the instructions. Note that this 



program prints the ANTIC display 
modes numbered 2-15. Use the pro- 
gram and the ANTIC/BASIC corre- 
spondences will become apparent. (See 
program 1 .) I also want to take you on a 
short trip into the world of basic raster 
scan graphics, Atari style, and then pro- 
vide a quick lesson in the use of display 
list interrupts. 

The normal NTSC raster television 
is made up of 625 interlaced scan lines. 
These scan lines are the horizontal 
lines appearing in the picture tube 
phospher when energized by the elec- 
tron beam as it sweeps left to right, top 
to bottom, across your screen. Inter- 
lacing occurs in normal television to 
eliminate flicker. It simply means that 
all even scan line rows are "painted" in 
one frame, and all odd lines in the next. 
The frame refresh rate is 60 Hz. 

Each Atari frame image contains 
262 scan lines with no interlacing. 
Every frame is the duplicate of the prior 
one unless there is programmer inter- 
vention. The image is repainted 60 
times per second, and the electron 



Table 1: Timing 

1.79 MHZ machine cycle 

262 scan lines per frame 

228 color clocks per scan line 

60 frames per second refresh rate 

1.79/60 = 29868 machine cycles per frame 
29868/262 =114 machine cycles per scan line 
228/114 = 2 color clocks per machine cycle 

Vertical Blank Time 

262 scan lines - 192 displayed scan line = 70 
70 x 114 cycles/line = 7980 cycles available* 

Horizontal Blank Time 

Wide Playfield 

228 clocks - 192 clocks = 36 clocks 

36/2 =18 machine cycles 

Normal Playfield 

228 clocks - 160 clocks = 68 clocks 

68/2 = 34 machine cycles 

Narrow Playfield 

228 clocks - 128 clocks = 100 clocks 

100/2 = 50 machine cycles 

•All graphics are cycle-stealing Direct Memory Access (DMA). Depending 
on graphics mode and memory refresh, this value will be less. 



beam is turned off at the end of every 
scan line. At that time it is returned to 
the left edge of the screen to start the 
next line trace. This is called horizon- 
tal blank time. 

The beam is also turned off after 
every frame so that it may return to top 
left corner of the screen, called vertical 
blank time. These two time periods are 
very important to the would-be ani- 
mator. It is crucial to understand how 
much time is available and how to 
enter code such that it will be executed 
at the appropriate moment. 

The 6502 microchip in the Atari 
cycles at 1.79 megahertz, almost twice 
as fast as the normal 6502. This cycle 
rate was chosen so that two color clock 
widths on a scan line equal one machine 
cycle. There are 228 color clocks on 
every scan line, and the maximum dis- 
playable width of any scan line is 176 
color clocks, called "wide playfield" in 
the Atari literature. The maximum res- 
olution is Vi color clock, and therefore 
Atari can display up to 352 picture 
elements (pixels) horizontally. The 
maximum vertical resolution, in scan 
line units is 240. Effectively, Atari has 
a high-resolution mode of 352 x 240. 

It's important to realize that there 
are physical limitations to this size 
display. Depending on your television's 
adjustment, some of the displayed im- 
age may appear on the curved edge of 
the picture tube. This overlap is called 
overscan. While overscan is not impor- 
tant in normal television viewing, it is 
crucial when your word processor is 
printing what you can't see. 

Atari, in its Operating System 
(O.S.), used a more conservative screen 
size of 320 (160 clocks) horizontally by 
192 scan lines vertically. This width 
screen is called normal playfield in the 
documentation. In this way Atari 
defeated normal overscan and assured 
us of seeing an entire image. There is a 
narrow playfield width as well, 256 pix- 
els (128 clocks wide). These dimen- 
sions and timing are important since 
what is not used at display time is left 
over and available at interrupt time. 
(See table 1 for timing.) 

It is relatively simple to change be- 
tween screen widths. Location $22F 
(Continued on page 46) 
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Get FREE space qAME disk wrrh orcJer 



With any purchase of the product listed here except software, you 
will receive one free THUNDERB1RDS-GX diskette. 
THUNDERBIRDS-CX: High-speed, High-resolution Space shooting 
game for Apple-II. Apple-U Plus with Disk-H (13 or 16 sector) 



Super joystick for Apple-II! Telephone styl 
keypad provides you extra programmable 
keys. Comes with graphics software. 

Fanta Slick l!^ro$99.oo 





Easy to use for both of one 

or two handed operation. High resolution and 

durable joystick is ideal for games and other 

applications. 

i^<? RobosTick I * 30 - 00 




Atar. joysTick $9.00 



Atari joystick is addopted to Apple! 
This set is ideal for direction cont- 
rol for games and screen plotter. 

Apple jimterFace 




Liqhi 



r-vrfv ^ eat construction with metal body 
f c *' Comes with control software. 



Apple-U $£*«s $25.00 
PET.CBM $4*^5 $25. 00 
TRSSOml sy^ $25.0 




RAM BoarcI For Apple ^-^ $125.01 

No more cable for your Apple Memory Board! 
On-board refresh circuit made this board independent 
from Apple's refresh signal. You need not pull out RAM 
from Apple-II to install the cable. 



4116(200ns) RAM 8 for $15.00 




Game 

For AppU 

$23.00 each 




HUNGRY BOY 

Chase in the maze in color! 



COSMO MISSION 

Most popular Apple game! 



"Marked items are limited In quantity. 

We mail the acceptance with expected shipping date on it. Contact us 

if you do not hear from us in 10 working days. 

Add $2 for each shipping. California resident add 6% tax. 

COD for money order or cahiers check only. Allow 2-3 weeks for the 

order with personal check. 

OJSfflOS Astar International Co. 

5676 FRANCIS &,VE.,CHIN0,CA9I710 714627-9887 

A-pple-H is a registered trademark of Apple Computer, Inc. 



ABBS4.0 

It was worth the wait! 

The original Apple Bulletin Board 
System is now the ultimate 
personal message system. 

Compatible with many large 
disk systems and Diskll. 

Add-on modules for 
customization. 



Software Sorcery, Inc. 

7927 Jones Branch Dr. 400 

Mc Lean. VA 22102 

(703) 385-2944 




See for yourself! Dial 

(703) 255-2192 



ED-SCI STATISTICS 

FOR THE PROFESSIONAL A COMPLETE STATISTICS 
AND DATA MANAGEMENT PACKAGE 



Data Entry and Filing 

• By Variable Name and 
Case Number 

• One-Time Data Entry 

• Easy and Rapid Editing 

• Data Entry Worksheets 

Data File Manipulation 

• Add New Variables 

•Add or Delete Case Values 

• Create SUBFILES By User 
Defined SEARCH & 
SELECT Criteria 

» Merge Files 



Statistical Calculations 

• Mean, Std. Dev., Std. Error 
•Coefficient of Variation 

• Frequency Distribution 

• Unpaired t-Test 

• Paired t-Test 

• Mann-Whitney U Test 
•Wilcoxon Paired Sample Test 
•Chi-Square Test 

• Linear Regression 
•Correlation 
•One-Way ANOVA with the 

Newman- Keuls Test 

• Hard Copy of Data & Results 



Statistical Calculations can be made on VISICALC* (DIF) 
and DATADEX* FILES. Graphic Plotting of all ED-SCI 
STATISVCS Data Files can be done with APPLE PLOT.* 

Only $95.00 brings you the ED-SCI STATISTICS instruction 
manual, the Master Program Disk, and a Back-Up Disk 

See ED-SCI STATISTICS at your local Apple Computer store. 
Dealer inquiries invited. For information please phone or write: 

Ed-Sci Development 

460 Beacon St. San Francisco, CA 94131 (415) 282-7020 

ED-SCI STATISTICS requires an Apple II with the Applesoft or 
Language Card, or an Apple II+, 48K memory, and at least one 
disk drive with DOS 3.3 (16 sector). 
'Apple is a registered trademark ot Apple Computer Inc. 
VlsCalc is a registered trademark of Personal Software Inc. 
OATADEX Is a registered trademark of Sonoma Softworks. 
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Innovative Design Software, Inc. 

ANNOUNCES 
SHUFFLEBOARD 

for your APPLE II.™ 
only $29.95 




W * ■ ■ I 

?l DilT 



Real time 
HIRES Color 
Graphics 



SHUFFLEBOARD 




• Play Against 
your APPLE or 
another opponent 

An accurate and 
challenging game 
following in the 
tradition of Pool 1.5 



POOL 1 .5 features 

• Realistic, life-like motion 

• HIRES Color Graphics 

• Choice of 4 popular pool Games 

• You've Got to see it to believe it! 

• Only $34.95 



— Another first from IDSI 




POOL 1.5 



"IT (Pool 1 .5) is so realistic, you begin filling in the details of the pool hall 

yourself" 
— Softalk Magazine 

Both of these excellent games require a 48K APPLE ll/Plus and a DISK II. Pool 
1 .5 requires a set of game paddles or Joystick. Order directly from IDSI or see 
your nearest APPLE dealer. 




Apple ll/Plus is 

a Trademark 

of Apple Computer Inc. 

Pool 1 .5 is a trademark 

of IDSI 



P.O. BOX 1658 

Las Cruces N.M. 88004 

(505) 522-7373 



MoitcrCardj 




We accept 

Visa. MasterCard. 

Check or Money Order. 
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(Continued from page 43) 

controls playfield width. Called Since many of these hardware loca- a display list interrupt. These inter- 

SDMCTL in the documentation, it is tions are write only, the O.S. keeps rupts can occur, under programmer 

initialized to $22. Writing a $23 will copies, called shadows, in RAM. Sha- control, on any scan line of every 

change the screen dimension to wide, dow registers update the associated frame. To effect an immediate change 

and writing $21 will reduce the screen hardware at Vertical Blank Interrupt at scan line interrupt, you must write , J 

to narrow. SDMCTL is the O.S. sha- time. Remember to use the shadows to directly to the hardware register. 

dow for a hardware register in the AN- effect a permanent change to the entire 

TIC chip at $D400, called DMACTL. frame. The exception occurs when using To use the Display List Interrupt 



(DLI), a number of things must be 
accomplished. First, write the DLI ser- 
vice routine. The important thing to 



10 REM »»» PROG1 ♦»» 

20 REM MEMORY AND DISPLAY LIST VARIES WITH GRAPHICS MODE 

30 REM DUMP AND DISASSEMBLE DISPLAY LIST 

40 REM 

100 ? " INPUT GRAPHICS MODE "JilNPUT MODE 

105 GRAPHICS MODE 

1 10 LST=PEEK<560HPEEK<561>»256;REM FIND START OF DISPLAY LIST 

120 MEMRY=PEEK(LST+4)+PEEK(LST+5H256!REM FIND START OF DISPLAY MEM. 

130 RAMTOP=PEEK<106>»256!REM NUMBER OF PAGES IN MEM DEFINED AT POWER ON 

140 REM LIST 

150 LPRINT ' OS GRAPHICS MODE "{MODE 

160 LPRINT " RAM AVAILABLE AT POWER ON "JRAMTOP 

170 LPRINT " START OF DISPLAY LIST "JLST 

180 LPRINT " START OF DISPLAY MEMORY "JMEMRY 

190 REM DUMP DISPLAY LIST WITH DISASSEMBLY OF INSTRUCTIONS 

195LMS=64:iNT=128:HSCRL=16:VSCRL=32!JVB=65SJMP=l 

200 FOR I=LST TO MEMRY-1 

205 LPRINT I J" "iPEEK(I>! 

210 INST=PEEK(I)!REM DISPLAY LIST VALUE 

215 IF INST>=128 THEN GOSUB HOOiGOTO 400 

220GOSUB 1140 

400 NEXT I 

410 STOP 

1 100 INST=INST-INT!REM get rid of interrupt bit 

1105 LPRINT " INSTRUCTION INTERRUPT ENABLE " 

1 140 GOSUB 2000!REM FIND JUMPS AND BLANKS 

1150 IF INST=0 THEN RETURN 

1160 GOSUB 1400JREM GO FIND LMS 

1 170 GOSUB 1500JREM GO FIND VSCROL 

1180 GOSUB 1600!REM GO FIND HORIZONTAL SCROLL 

1190 GOSUB 1700!REM TRANSLATE ANTIC MODE TO OS GRAPHICS MODE 

1200 RETURN 

1400 IF INST<66 THEN RETURN !REM NO LMS 

1405 LPRINT " LOAD MEM SCAN FROM ";PEEK<I+lHPEEK(I+2>*256 

1410 INST=INST-LMS!REM GET RID OF LMS BIT. 

1420 I=I+2!REM INCREMENT LOOP AROUND ADDRESS BYTES 

1430 RETURN 

1500 IF INST<34 THEN RETURN !REM NO VSCROL ENABLE 

1510 INST=INST-VSCRL!REM GET RID OF VSCROLL BIT 

1520 LPRINT " VERTICAL SCROLL ENABLED " 

1530 RETURN 

1600 if inst<18 then return jrem no hscroll enable 

1610 inst=inst-hscrl:rem get rid of horizontal scroll bit 

1620 lprint " horizontal scroll enabled " 

1630 RETURN 

1700 LPRINT " ANTIC DISPLAY MODE "[INST 

1750 RETURN 

2000 IF INST=0 OR INST=16 OR INST=32 OR INST=48 OR INST=64 OR INST=80 OR INST=96 OR INST=112 THEN G 

OSUB 2100 

2010 IF INST=1 THEN GOSUB 2200 

2020 IF INST=65 THEN GOSUB 2300 

2030 RETURN 

2100 LPRINT " BLANK "!INT(INST/16)+1!" LINES" 

2110INST=0!RETURN 

2120 REM 

2200 lprint " jump instruction to ";peek(i+l)+peek(i+2)*256 
2210 i=i+2!rem increment around address bytes 
2215 inst=inst-jmp:return 

2220 REM , 

2300 LPRINT " JUMP Si WAIT FOR VERTICAL BLANK TO ";PEEK(I+l)+PEEK(I+2>»256 ^ 

2310 I=I+2!REM INCREMENT AROUND ADDRESS BYTES 
2315 INST=INST-JVB!RETURN 
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remember here is to save and restore 
any registers needed by the routine. 
Then find a free place in memory for 
this routine. (As you know, Atari has 
reserved page six, decimal 1536, just 
for users.) Next, update the vector at 
$200 and $201 to point to start of the 
routine. Now change the appropriate 
display list instruction to cause an in- 
terrupt (accomplished by turning on bit 
7 of the instruction]. Finally, enable 
DLIs by setting bit seven of hardware 
register $D40E, called NMIEN (Non- 
Maskable Interrupt enable). See pro- 
gram 2 for a simple example. 

Also remember to set the interrupt 
in the mode line prior to the location 
where you would have the changes oc- 
cur. Then write to a location called 
WSYNC SD40A. This will cause any 
changes to be delayed to the start of the 
next scan line and, therefore, allow a 
smooth synchronized transition. 



DLIs can be used for everything 
from putting many colors on the 
screen, to changing among a number of 
character sets, to moving player/mis- 
siles around. To get the most from 
Atari, experiment with this concept. 



10 REM **» PROGRAM 2 *** 

20 REM THIS WILL CREATE A DISPLAY LIST WITH DLI ENABLED 

30 REM THE SCREEN WIDTH IS NARROWED AT DLI TIME AS WELL 

40 REM 

45 GRAPHICS OiSETCOLOR 4,4,9!REM SET BORDER COLOR 

50 DLST=PEEK(560)+PEEK(561)*256!REM FIND START OF DISPLAY LIST 

60 POKE DLST+14,PEEK(DLST+14H-128!REM TURN ON INTERRUPT BIT 7 

70 FOR L=0 TO 2?!REM POKE DLI SERVICE ROUTINE INTO PAGE 6 

80 READ INSTRCTiPOKE 1536+L,INSTRCT 

90 NEXT L 

100 DATA 72,138,72,169,40,162,48,141,10,212,141,23,208 

110 DATA 142,24,208,169,33,141,0,212,162,140,142,26,208,104,170,104,64 

120 POKE 512,0!POKE 513.6SREM POINT TO DLI INTERRUPT SERVICE ROUTINE 

130 POKE 54286, 192IREM ENABLE DLI 

140 LIST 

150 REM »♦* DLI SERVICE ROUTINE *♦» 

152 REM PHA SAVE REGISTERS 

154 REM TXA 

156 REM PHA 

158 REM LDA #$28 CHARACTER LUMINENCE 

160 REM LDX #*30 BACKGROUND COLOR 

162 REM STA SD40A WAIT FOR HORIZONTAL SYNCH 

164 REM STA *D017 PLAYFIELD 1 

166 REM STX *D018 PLAYFIELD 2 

168 REM LDA #21 NARROW PLAYFIELD 

170 REM STA *D400 DMACTL ENABLE NARROW WIDTH 

172 REM LDX #$8C BORDER COLOR 

174 REM STX *D01A COLBK 

176 REM PLA RESTORE REGISTERS 

178 REM TAX 

180 REM PLA 

182 REM RTI RETURN FROM INTERRUPT 
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DUAL DOS ROMS 

FOR APPLE ][* 




WITH 

MOUNTAIN COMPUTER'S ANDROMEDA'S 

*R0MPLUS 0R ROMBoard* 

SWITCH FROM ONE DOS (3.2 or 3.3) TO THE OTHER 

WITHOUT BOOTING 

DUAL DOS ROMS - No gadgets or unsightly switches hanging from your disk controller, no software to run, no memory space used to store the other DOS, does not need the use ol the 
3 2 Proms (lor those ol you who purchased a disk drive with 3.3 DOS). Utilizes the standard 3.2 1 and 3.3 DOS. no special software (Muttin/Demuttin) to move your programs to and 
from 13 and 16 sector disks, no system pointers are changed, and is unaffected By any DOS commands This invaluable utility is contained in two ROMs, which when plugged into MC's 
Romplus* or the Andromeda ROMBoard*. will be permanently imbedded in your Apple's memory and waiting for instant access. The length of time it takes the Apple to perform a 
carriage return is about how last it takes to switch from one DOS to the other. Both ROMs have their own intelligence which allows one ROM to find the other, in order lor them to toggle 
between either DOS. Either ROM can be initialized first. If the 3.2 ROM is initialized first the Applesoft Ampersand command can be used to toggle or flip from one DOS to the other. On 
the otherhand, il you wish to preserve the existing Ampersand command vectors, the 3.3 ROM can be initialized first. The toggle or flip between DOS can then be accomplished by a 
simple CALL command from either Basic or Direct from the Monitor. Any program that is in memory will not be affected by the flip between DOS. The flexibility ol toggling either DOS 
tends itself very easily to be done directly Irom within your own programs. Diskettes can be initialized from either DOS and 13 sector disks will have the faster INIT routine as part ot its 
DOS. DUAL DOS ROMS are not recommended for use with disk drives that are configured with 3.2 Proms. Will operate with FP. INT. or LC and requires 48K. DOS 3 3. and MCs 
Romplus or Andromeda's ROMBoard. (two ROM Set) $54,95 

MT. COMPUTER'S ROMPLUS BOARD WITH ONE ROM S17S.OO ANDROMEDA'S ROMBOARD WITH ONE ROM $125.00 SELECT OHE ROM FROM BELOW (ADD S20.00 FOR DUAL DOS ROMS) 
OTHER ROMS AVAILABLE: All ROMS are compatible with MCs Romplus or Andromeda's ROM Board.) 

■ FP RENUMBER/MERGE ROM Apple Computer's infamous renumber program $39,95 

• BASICS ROM • Will boot standard, special, and dedicated 1 3 sector disks $39.95 

■ FP EDITROM • Global search, change, and remove. (Works jointly with PLE) $39.95 

- COMMAND ROM • Catalog Command Menu and Disk Map $39.95 

- DISK COPY/ SPACE ROM - Duplicates 1 3 or 1 6 Sector Disks $39.95 

■ FP UTILrTY ROM • Aulo Line Numbering. LIST CTRL. RESURRECT KILLED PROG . Alphabetize DISK CAT . Expung DOS $39.95 

(Check or M.O.) Visa or MasterCard Accepted 

Soft CTRL Systems , box 599, west milford, nj 07480 201-728-8750 Hssssssssssimaim 
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Introducing the M line . . . 

Now! Drive Systems for AIM, KIM and SYM Computers 

- from PERCOM. 



Assembled and tested systems start at only 
$599.95, including the drive controller cir- 
cuit card, disk-operating system, intercon- 
necting cable, drive and comprehensive us- 
ers manual. 

• The right storage capacity - Available in 1-, 2- and 3-drive 
systems, with either 40- or 80-track drives. 

• Flippy storage — Flippy drives (optional) let you flip a diskette 
and store data and programs on the second recording surface. 

• High Storage Capacity - Formatted, one-side storage capac- 
ity is 102 Kbytes (40 track drive), 205 Kbytes (80-track drive). 

• Proven Controller - The drive controller design is the same as 
the design used in the Percom 680X LFD mini -disk system. This 
system - introduced in 1977 - has given reliable service in thou- 
sands of applications. Two versions are available: the MFD-C65 
for the AIM-65 expansion bus, and the MFD-C50 for the Sys- 
tem-50 (SS-50) bus. 

• Includes an explicit data separator circuit that's reliable 
even at the highest bit densities. 

• Provides for on-card firmware. 

• Includes a motor inactivity time-out circuit. 

• Capable of handling up to four drives. 

• Capable of reading both hard- and soft-sectored diskettes. 



• DOS included - The MFD disk-operating system works with 
the AIM monitor, editor, assembler, Basic and PL/65 programs, 
interface is direct, through user I/O and Fl, F2 keys. Diskette in- 
cludes DOS source code and library of 20 utility commands. 

• Reliability assurance - Drives are burned-in 48 hours, under 
operating conditions, to flag and remove any units with latent 
defects. 

• Full documentation - Comprehensive hardware and soft- 
ware manuals are included with each system. 

Now! Expand your AIM-65 with Low-cost System-50 
Modules. 

The Percom M65/50 Interface Adapter connects your M-65 bus to 
Percom's System-50 (SS-50) motherboard, allowing you to ex- 
pand your AIM, KIM or SYM with proven System-50 modules. 
You can add disk storage, memory modules.even a video display 
system. The M65/50 provides buffer-amplification of address, data 
and control lines. On-card decode circuitry lets you allocate ad- 
dress space either to the computer or to the expansion mother- 
board. Price: only $89.95, including System-50 motherboard. 

System Requirements: AIM-65. KIM or SYM computer with ex- 
pansion bus and four Kbytes RAM (min). 







PERCOM DATA COMPANY, INC. 

1 1220 PAGEMILL RD. DALLAS. TX 75243 
1214)340 7081 

Toil-Free Order Number: 1-800-527-1222 

PRICES AND SPECIFICATIONS SUBJECT TO CHANGE WITHOUT NOTICE 

6 1981 PERCOM DATA COMPANY, Inc. 

PERCOM. MFD-C50. MFD-C65 and M65/50 are trademarks ol Percom Data Company. Inc 

AIM-65 is a trademark ol Rockwell International. Inc 

KIM is a trademark of MOS Technology Corporation 

SYM is a trademark ol Synertek, Inc 




, I'd like to know more about Percom MFD drive systems, 
lush me free literature. 

Send to 

PERCOM DATA COMPANY. Inc.. Dept. 65-M 

11220 Pagemill Rd Dallas, TX 75243 



drive systems. 



address 



city 



phone number 
MAIL TODAY! 
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Some Help for KIM 

Part 2 



Last month we saw how the KIM 
memory dump routine could be 
improved to provide a program 
format memory dump routine. 
This month we will continue our 
improvements to KIM by 
investigating the operation of 
the Single Step feature. Next 
month we will investigate 
improving the features of the 
Single Step routines. 



Wayne D. Smith 
Math/Computer Science Dept. 
Austin Peay State University 
Clarksvilie, Tennessee 37040 



The single-step mode on the KIM can 
be very useful in determining where an 
erroneous program is malfunctioning. 
When KIM is in the single-step mode, 
one instruction is executed each time 
the letter G is depressed on the ter- 
minal. After the step is executed, KIM 
prints the address of the next instruc- 
tion to be executed, and the operation 
code at that address. KIM then awaits 
another letter G key-press before ex- 
ecuting the next step. 

This mode of operation can be a 
great help to the user, but unfortunate- 
ly, it does not always provide enough 
information for complete analysis of 
program operation. For example, the 
operand associated with the instruction 
about to be executed isn't shown. A 
user can single-step through a program 
several times before he discovers that 
all the operation codes are correct, but 
that one of the addresses is wrong. 

Even the operation code and the 
operand are often not sufficient to pin- 
point the error. It would also be bene- 
ficial to be able to determine the con- 
tents of the registers, the stack pointer 



and the status flags. This information 
is available to the user, but he must 
first remember when KIM stores this 
information, and then print these loca- 
tions one at a time. It would be much 
more convenient if the single-step soft- 
ware would print all this information 
for the user after each step were 
executed. 

To write a single-step program, 
however, it is first necessary to under- 
stand how the KIM single-step feature 
operates. In essence, whenever an in- 
struction is fetched and the single-step 
switch is on, a non-maskable interrupt 
is generated. This interrupt is gener- 
ated by the sync signal from the 6502, 
which goes high only when an instruc- 
tion fetch is taking place. This signal 
remains low for all other memory ac- 
cess operations. 

The non-maskable interrupt input 
to the 6502 is an edge-triggered signal. 
That is, this pin is sensitive only to a 
high to low transition of the input 
signal. This means that the interrupt is 
not generated until the sync signal goes 
high and then low again. When this sig- 
nal goes low, however, the instruction 
fetch is already in progress. Therefore, 
the interrupt is not honored until the 
current instruction has been fetched 
and executed. After instruction execu- 
tion has been completed, the interrupt 
is honored, and the normal interrupt se- 
quence is entered. The program count- 
er and status register are pushed onto 
the stack. An indirect jump is then ex- 
ecuted to the address stored in the NMI 
vector address ($17FA and $17FB on an 
unexpanded KIM). Normally, this is a 
jump to location 1C00. 

The software located at 1C00 takes 
care of storing the registers, the pro- 
gram counter, the stack pointer and the 
status register in predetermined page 
zero addresses. After printing a carriage 
return and a line feed, KIM then prints 
the address of the next instruction and 
the value stored at that address. This is 
relatively easy, since the program count- 
er that was stored earlier is pointing to 



that address. KIM then goes into a loop 
awaiting a new key-press. 

But, the question arises as to how 
the software located at 1C00 should be 
executed without generating additional 
interrupts whenever an instruction fetch 
takes place. This problem is eliminated 
by NANDing the sync signal with the 
K7 signal and using this output to gen- 
erate the interrupt. In this manner, an 
interrupt will only take place if an in- 
struction fetch takes place to an ad- 
dress which is outside K7. If the K7 
signal is low, the interrupt gate is effec- 
tively disabled. This means that any of 
the KIM software located in the ROM 
address space K7 may be executed with- 
out generating interrupts. This is very 
convenient. Not only is the single-step 
software located in K7, but most of the 
other KIM routines, except the tape in- 
put and output programs, are also lo- 
cated here. This point does raise a 
minor problem because it is not possi- 
ble to single-step any program which is 
located in K7. This presents no real dif- 
ficulty, however, since I have yet to 
find a programming error in the KIM 
software. 



Now, if the user wishes to write an 
improved single-step routine, it will 
not work if it is located outside the 
K7 address space. In fact, if this is at- 
tempted, an infinite loop of interrupts 
will be generated as the interrupt 
causes a branch to a location, which 
generates an interrupt which causes a 
branch to ..., etc. 

Therefore, to use a modified single- 
step program, there are two possible 
alternatives. The first alternative is to 
locate the new program in K7. This is 
clearly impossible, since K7 is not only 
ROM, but all 1024 locations are already 
in use by the KIM software. The only 
other alternative is to make a minor 
hardware modification to the KIM it- 
self so that programs in some other area 
will not generate the NMI signal when 
instructions are fetched from this area. 
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igure 1a: Unmodified KIM Single Step Hardware 
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Figure lb: Modified Hardware for Single Step Program Located In K5 
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Figure la shows the hardware asso- 
ciated with the KIM single-step inter- 
rupt generator. To prevent generating 
an interrupt in an area other than K7, it 
is necessary to AND the K7 signal with 
the K signal for that area of memory. 
Notice that it would not be wise to 



replace the K7 signal with the new 
signal, since this would make all the 
KIM routines in K7 run in single-step 
mode. Since the terminal I/O routines 
would probably be needed for any 
single-step program, this approach is 
impractical. 



Figure lb shows the added gate 
which allows location of the single-step 
program in either K7 or K5. In my case, 
K5 was chosen because the 128 bytes of 
RAM located in this area are just 
enough for the single-step program, but 
too small for anything else. In addition, 
I also use area K5 for all my I/O ports, 
and hence, have no additional RAM lo- 
cated here. Access to an I/O port will 
not generate a fetch (sync) signal, 
therefore K5 is an ideal area for my 
system. 

If you prefer to locate the single-step 
program somewhere else, you may do 
so by substituting the appropriate K 
signal for K5. This will definitely 
become necessary if you are using a 
TVT-6, which utilizes the 128 bytes of 
K5 RAM to generate video displays. 
The single-step program itself is easily 
relocated, but remember, if you move 
it to another area, no program which is 
stored in that entire IK area can be 
single-stepped. 

Next month we will look at some 
variations on the hardware modifica- 
tions, and also examine the software 
needed to provide an improved single- 
step capability. 

20355 



Perry PerIp^eraIs RepAJRS KIMs!! 

(SYMs ANd AIMs Too) 



• We will Diagnose, Repair, and Completely Test your Single Board Computer 

• We Socket all replaced Integrated Circuits 

• You receive a 30-day Parts and Labor Warranty 

• Labor is $38.00 if 40-pin ICs are socketed ($40.00 otherwise) — Parts Extra 

• Your repaired S.B.C. returned via U.P.S. — C.O.D., Cash 

Don't delay! Send us your S.B.C. for repair today 
Ship To: (Preferably via U.P.S.) 

Perry PerjpIieraIs 

6 Brookhaven Drive 
Rocky Point, NY 11778 

Perry Peripherals carries a full line of the acclaimed HDE expansion components for your KIM, SYM, and 
AIM, including RAM boards, Disk Systems and Software like HDE Disk BASIC V1. 1. Yes, we also have 
diskettes. For more information, write to: P.O. Box 924, Miller Place, NY 11764 or Phone (516) 744-6462. 
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GRAPHICS 

FOR OSI COMPUTERS 

ft You Can Produce The Images 
Shown Or Yours And Program 
Motion With Our 256 By 256 High 
Resolution Graphics Kit. ^4 

Thats 65,536 Individually Controlled 
Points On Your TV Screen. 

ft Increase Column/Line Display. 
You Can Set Up Your Own Graphic 
Pixels Including Keyboard Characters 
And Unlimited Figures. ^* 

ft This Kit Includes All Parts, Software 
And Assembly Instructions Required 
To Get Up And Running. 
The Included 8k Of 2 1 1 4 Memory 
Is Automatically Available When 
Not Using The Graphics. 
Boot Up And See 8k More Memory. 

ft Adding The Kit Does Not Affect 
Your Existing OSI Graphics. 
Use Both At The Same Time 
Or Separately. 

ft Buy The Entire Kit, 

Including Memory, For $185.00 
Or A Partial Kit For Less If You 
Have Parts. Board And 
Instructions $40.00. Instructions 
Include Software. 





Sjqui 



For This Kit Or A Catalog 

Of Other Kits, Software 

And Manuals Call Or Write: 

MITTENDORF ENGINEERING 

905 Villa Neuva Dr. 

Litchfield Park, Az. 85340 

(602)-935-9734 



OSI 



TRS-80 



COLOR-80 



OSI 



GALAXIAN - 4K - One of the fastest and finest 
arcade games ever written for the OSI, this one 
features rows of hard-hitting evasive dogfighting 
aliens thirsty for your blood. For those who 
loved (and tired of) Alien Invaders. Specify 
system - A bargain at $9.95 OSI 



LABYRINTH - 8K - This has a display back- 
ground similar to MINOS as the action takes 
place in a realistic maze seen from ground level. 
This is, however, a real time monster hunt as you 
track down and shoot mobile monsters on foot. 
Checking out and testing this one was the most 
fun I've had in yearsl - $13.95. OSI 



THE AARDVARK JOURNAL 
FOR OSI USERS - This is a bi-monthly 
tutorial journal running only articles about OSI 
systems. Every issue contains programs custom- 
ized for OSI, tutorials on how to use and modify 
the system, and reviews of OSI related products. 
In the last two years we have run articles like 
these! 

11 A tutorial on Machine Code for BASIC 
programmers. 

2) Complete listings of two word processors 
for BASIC IN ROM machines. 

3) Moving the Directory off track 12. 

4) Listings for 20 game programs for the OSI. 

5) How to write high speed BASIC - and 
lots more — 

Vol. 1 (1980) 6 back issues - $9.00 

Vol. 2 (1981) 4 back issues and subscription for 

2 additional issues - $9.00. 

ADVENTURES!!! 

For OSI. TRS-80, and COLOR-80. These 
Adventures are written in BASIC, are full fea- 
tured, fast action, full plotted adventures that 
take 30-50 hours to play. (Adventures are inter- 
active fantasies. It's like reading a book except 
that you are the main character as you give the 
computer commands like "Look in the Coffin" 
and "Light the torch".) 

Adventures require 8K on an OSI and 16K on 
COLOR-80 and TRS-80. They sell for $14.95 
each. 

ESCAPE FROM MARS (by Rodger Olsen) 
This ADVENTURE takes place on the RED 
PLANT. You'll have to explore a Martian city 
and deal with possibly hostile aliens to survive 
this one. A good first adventure. 

PYRAMID (by Rodger Olsen) 
This is our most challenging ADVENTURE. It 
is a treasure hunt in a pyramid full of problems. 
Exciting and tough! 

TREK ADVENTURE (by 8ob Retelle) 
This one takes place aboard a familiar starship. 
The crew has left for good reasons - but they for- 
got to take you, and now you are in deep trouble. 

DEATH SHIP (by Rodger Olsen) 
Our first and original ADVENTURE, this one 
takes place aboard a cruise ship - but it ain't the 
Love Boat. 

VAMPIRE CASTLE (by Mike Bassman) 
This is a contest between you and old Drac - 
and it's getting a little dark outside. $14.95 each. 



OSI NEW-NEW-NEW OSI 

TINY COMPILER 

The easy way to speed in your programs. The 
tiny compiler lets you write and debug your pro- 
gram in Basic and then automatically compiles a 
Machine Code version that runs from 50-150 
times faster. The tiny compiler generates relocat- 
able, native, transportable machine code that can 
be run on any 6502 system. 

It does have some limitations. It is memory 
hungry — 8K is the minimum sized system that 
can run the Compiler. It also handles only a 
limited subset of Basic — about 20 keywords in- 
cluding FOR. NEXT. IF THEN, GOSUB. GOTO, 
RETURN, END. STOP, USR(X), PEEK, POKE, 
-,=,*,/, , S,\ , Variable names A-Z, and Integer 
Numbers froVn 0-64K. 

TINY COMPILER is written in Basic. It can 
be modified and augmented by the user. It comes 
with a 20 page manual. 
TINY COMPILER - $19.95 on tape or disk OSI 

SUPERDISK II 

This disk contains a new BEX EC" that boots 
up with a numbered directory and which allows 
creation, deletion and renaming of files without 
calling other programs. It also contains a slight 
modification to BASIC to allow 14 character 
file names. 

The disk contains a disk manager that con- 
tains a disk packer, a hex/dec calculator and 
several other utilities. 

It also has a full screen editor (in machine 
code on C2P/C4)) that makes corrections a snap. 
We'll also toss in renumbering and program 
search programs — and sell the whole thing for — 
SUPERDISK II $29.95 (5V) OSI 

BARE BOARDS FOR OSI C1P 
MEMORY BOARDS!!! - for the C1P - and they 
contain parallel portsl 

Aardvarks new memory board supports 8K 
of 2114's and has provision for a PIA to give a 
parallel ports! It sells as a bare board for $29.95. 
When assembled, the board plugs into the expan- 
sion connector on the 600 board. Available now! 

PROM BURNER FOR THE C1P - Burns single 
supply 2716's. Bare board - $24.95. 

MOTHER BOARD - Expand your expansion 
connector from one to five connectors or use it 
to adapt our C1P boards to your C4/8P. - $14.95. 

16K RAM BOARD FOR C1P - This one does 
not have a parallel port, but it does support 16K 
of 21 14's. Bare Board $39.95. 




WORD PROCESSING THE EASY WAY- 
WITHMAXI-PROS 

This is a line-oriented word processor de- 
signed for the office that doesn't want to send 
every new girl out for training in how to type a 
letter. 

It has automatic right and left margin justi- 
fication and lets you vary the width and margins 
during printing. It has automatic pagination and 
automatic page numbering. It will print any text 
single, double or triple spaced and has text cen- 
tering commands. It will make any number of 
multiple copies or chain files together to print an 
entire disk of data at one time. 

MAXI-PROS has both global and line edit 
capability and the polled keyboard versions 
contain a corrected keyboard routine that make 
the OSI keyboard decode as a standard type- 
writer keyboard. 

MAXI-PROS also has sophisticated file 
capabilities. It can access a file for names and 
addresses, stop for inputs, and print form letters. 
It has file merging capabilities so that it can store 
and combine paragraphs and pages in any order. 

Best of all, it is in BASIC (0S65D 51/4" or 
8" disk) so that it can be easily adapted to any 
printer or printing job and so that it can be sold 
for a measly price. 
MAXI-PROS - $39.95. Specify 5'/« or 8" disk. 

SUPPORT ROMS FOR BASIC IN ROM MA- 
CHINES - C1S/C2S. This ROM adds line edit 
functions, software selectable scroll windows, 
bell support, choice of OSI or standard keyboard 
routines, two callable screen clears, and software 
support for 32-64 characters per line video. 
Has one character command to switch mode! 
2 C1P from 24 to 48 character line. When in- 
stalled in C2 or C4 (C2S) requires installation 
of additional chip. C1P requires only a jumper 
change. - $39.95 

C1E/C2E similar to above but with extended 
machine code monitor. - $59,95 OSI 



ARCADE GAMES FOR OSI, COLOR-80 AND 
TRS-80 (8K OSI, 16K TRS-80 AND COLOR-80) 

TIMETREK - A REAL TIME, REAL GRAPHICS 
STARTRECK. See your torpedoes hit and watch 
your instruments work in real time. No more un- 
realistic scrolling displays! $14.95. 

STARFIGHTER - This one man space war game 
pits you against spacecruisers, battlewagons, and 
one man fighters, you have the view from your 
cockpit window, a real time working instrument 
panel, and your wits. Another real time goody. 
$9.95 

BATTLEFLEET - This grown up version of Bat- 
tleship is the toughest thinking game available on 
OSI or 80 computers. There is no luck involved 
as you seek out the computers hidden fleet. A 
topographical toughie. $9.95 

QUEST - A NEW IDEA IN ADVENTURE 
GAMES! Different from all the others. Quest is 
played on a computer generated mape of Alesia. 
Your job is to gather men and supplies by comb- 
bat, bargaining, exploration of ruins and temples 
and outright banditry. When your force is strong 
enough, you attack the Citadel of Moorlock in a 
life or death battle to the finish. Playable in 2 to 
5 hours, this one is different every time. 
16K COLOR-80 OR TRS-80 ONLY. $14.95 




OSI 



Please specify system on all orders 

This is only a partial listing of what we have to offer. We offer over 120 games, ROMS, and data sheets for OSI systems 
and many games and utilities for COLOR-80 and TRS-80. Send $1.00 for our catalog. 

AARDVARK TECHNICAL SERVICES, LTD. 

2352 S. Commerce, Walled Lake, Ml 48088 

(313)669-3110 
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OSI 

Symbolic 

Disassembler 



This modification of Werner 
Kolbe's "Symbolic Disassembler" 
was written for OSI C4P. 
However, it should run, with few 
further modifications, on other 
OSI machines. 



David E. Pitls 

16011 Stonehaven Dr. 

Houston, Texas 77059 



I was in the process of trying to under- 
stand BASIC on my OSI 4PMF and had 
already ordered the books on how 
Microsoft BASIC works, but wanted to 
know more. I thought that a good way 
to learn would be to disassemble parts 
of BASIC (located $0200 to $2300), so I 
booted the system, loaded the assem- 
bler/disassembler and proceeded to dis- 
assemble that region of RAM. While 
the computer was churning away I 
glanced in the OSI 4P book to be sure 
that I was working on the correct 
region. Much to my dismay I noticed 
that $200 to $2300 was now occupied 
by the Assembler and Extended Moni- 
tor. Back at the drawing board, three 
choices came to mind: move the Assem- 
bler/Disassembler, move BASIC, or 
write a disassembler in BASIC. The 
first two choices would involve con- 
siderable work in changing absolute ad- 
dresses and jumps, so a disassembler in 
BASIC seemed in order. 

My disassembler was just coming to 
life when my son pointed out the PET 
symbolic disassembler in the January 
1981 issue of MICRO (32:23) . Not be- 
ing familiar with the dialect of BASIC 
used with the PET, I ignored his sugges- 
tion and continued on my program. A 
week later my disassembler was still 
giving OM |out of memory) errors after 
successfully disassembling about 6 
lines of code — obviously due to a bug 
in the string usage, as there should 
have been plenty of the 48K of memory 
left. I was about ready to convert my 
string usage to the more efficient 



techniques discussed by Edward Carl- 
son in "A 6502 Assembler in BASIC," 
MICRO, (34:7), when my son once 
again suggested the PET disassembler 
program. 

The next few hours involved 
reading Werner Kolbe's carefully 
documented article, and keying in the 
program. Some confusion occurred 
when I encountered "GET" and the 
symbols for "home", but logic sug- 
gested the former was an input from 
the keyboard and the latter was a key 
on the keyboard, so I proceeded on that 
assumption. It was unclear why I 
would need to open and close files (line 
45), as Kolbe did on the PET, unless I 
needed to save all the disassembled 
code. Since I didn't think that this was 
the case, I gambled that this was just a 
peculiar aspect of PET BASIC and 
removed the "OPEN", "CLOSE", and 



converted " PRINT* 1" to "PRINT" in 
all the statements. 

Editor's Note: Files were used in 
Kolbe's program to make it easy to 
switch between screen and printer. The 
PET screen is treated as an IEEE-488 
device (3), just like the printer, so the 
save file number (1, in this case) can be 
used in the PRINTtt statements. The 
only difference is in the device number 
when the file is opened. 

Table 1 lists the line numbers and 
the changes that were made to convert 
to OSI BASIC. The converted program 
(shown in the listing) occupies 4067 
bytes, which should allow sufficient 
room for table and string storage even 
on 8K machines. The program was 
written in DOS 3.2 OSI BASIC. The 
string bug problem on some BASIC-in- 
ROM machines would be the only 



Table 1: Changes to the PET Disassembler 


Line 


Remarks 


10 


remove the PET string bug fix 


15 


remove the PET string bug fix 


40 


add line for title 


45 


print code for output devices 


50 


change prompts 


51 


move "if statement" from line 50 to 51 


105 


change "GET" to PEEK(57088) = 5 for left shift 


115 


change to prompt for instructions 


116 


check for escape key, PEEK(57088) = 33 


119 


add to check for right shift, PEEK(57088) = 3 


125 


change from RETURN to GOTOH6 


165 


change " = " to "#$" 


295 


change to E = PEEK(P) 


550 -v 
565 > 


remove SPC(8-LEN|E$)) ; to cause variable 


575 / 


and address list to be printed in 2 columns 


all lines change PRINT #1 to PRINT 


471 


additional lines had to be added 


481 


to data statements because of length 


486 




i 


491 




i 


501 




i 


511 




i 


516 




i 


531 




• 


536 


" 
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Three 

IMPORTANT 

Books for your APPLE] 




The MOST Complete $14.95* 

M EMORY MAP of the 1 28 pages 
Apple ever published. 




$24.95* 
each 

224 pages 
w/DISK 



Two SUPERB blends 

of articles and 
programs from 
MICRO magazine 
for the Apple. 



To order, call toll-free 

1-800-227-1617 Ext. 564 

In California: 
1-800-772-3545 Ext. 564 



MICRO INK, Inc. 

34 Chelmsford St. 

P.O. Box 0502 

Chelmsford, MA 01824 

"Add $2.00 for shipping. 
Massachusetts residents add 5% tax. 



Master 

Card & 

VISA 

Accepted 



potential reason for it not working on 
all OSI 6502 systems. 



I have changed the program to allow 
the "left shift" to stop the dis- 
assembly, "right shift" to resume, and 
"escape" to allow the user to list the 
addresses of the machine-generated 
labels. The program prompts the user 
for the output devices: two for the CRT 
and ten for the CRT and unit four 
(parallel] printer. Should you have a 
serial printer, three should be used in 
place of ten. 



As in Kolbe's program, two passes 
through the program are necessary to 
get all the symbolic labels. I usually 
make the first pass using the CRT as 
the output device, and the second pass 



with the printer activated. Then I print 
out the symbolic labels and their ad- 
dresses. The progam runs quite fast, 
disassembling eight pages of code (2K 
bytes) in about seven minutes. When 
the Centronics 737 printer is used, the 
system takes about 35 minutes for 
eight pages. 



David Pitts is an Aerospace Technologist 
at the NASA-Johnson Space Center in 
Houston, Texas. His training is in 
Engineering Physics, Geophysics, and 
Meteorology, and he has been involved in 
the Gemini, Apollo, Skylab and Landsat 
spacecraft programs. He has programmed 
in FORTRAN on IBM, Univac, and DEC 
machines since the 1960's and only 
recently has been programming in BASIC. 



2 REM SYMBOLIC DISASSEMBLER FOR PET BY WERNER KOLBE- MICRO .JAN81-PG 

3 REM AS MODIFIED BY DAVID PITTS FOR OSI 1PMF 
DM=Z55!PM=50 

DIMM»(255> ,L*<DM> ,L(DM) ( ZX(2S5) ,Z*<255> , P( Ph> , Ft <PM) 

25 dm=dm-i:pm=pm-i:z*<o>="zero":l*(o>="label":p«(0>="page >o m 

30 fori=ot0255:readm*(i):next 

10 printtab( 25) ["disassembler" sprint: print! print 

11 print"<lshift> to stop"jprint 

15 input"output device <2=crt, 10=crt 8 line printer) " jd: p0ke8991 ,d 

50 fl=i:input"starting hex loc (or label code) " j e*: print 

51 IFE*="PM"THENUt="" :G0T0515 
55 IFE*="PL"THENV»="L" :G0T0515 
60 IFE«="PJ"TH£NV«="J" :G0T0515 
65 IFE*="PZ"THEN560 

70 IFE*="PW"THEN57<) 
72 IFE*="ENTRY"THEN600 
75 GOSUB280:P=E-1 

so p=p+i:e=p:s=i:gosub325:ifl*<>" m thenfl=i 

85 GOSUB300 

?o printspc(5-len<e*))E*j:gosub295:print m "e*;:k=5 

92 M*=LEFT*(M*(E> ,3) :B=VALCMID*(M*CE) ,1) > 

95 0NB*FL+1G0SUB135, 165, 170 , 180 , 185, 190 , 210 ,215, 220 ,235,210 ,250 ,260 

105 IFPEEK<57088)=5THENGOT0115 

110 GOTO80 

115 PRINT:PRINT m <ESC> FOR LABEL ADDRESSES, <RSHIFT> TO CONT" 

116 IFPEEK< 57088 )=33THENPRINT"LABEL CODE=PM, PL,PJ,PZ,PW" :GOTO50 
119 IFPEEK(5708B)=3THEN105 

125 G0T0U6 

130 PRINT" "E*SPC<K>LtSPC(7-LEN<L*> )Mt" "H RETURN 

135 IFFL=lANDh«<>"?"THENPRINTSPC<8)L$SPC(7-LEN(L*))M*:RETURN 

110 FL = : IFM*="BRK"THENFL=1 1 PRINT : RETURN 

115 PRINTSPC(IS)"? : "CHRK3D! :iFE>30ANDE<128THENPRINTCHR*(E) 

150 IFE<30THENPRINTCHR*(E+61> 

155 IFE>127THENPRINTCHR*(E-12B> 

160 RETURN 

165 GOSUB290:GOSUB130:PRINT"»»"E$: RETURN 

170 U«="" 

175 GOSUB290 i GOSUB130 ! GOSUB380 : PRINTZ$V«: RETURN 

180 V»-",X":G0T0175 

185 V»=",Y"!GOT0175 

190 U«="" 

195 gosubz9o:print" "e«;:h«=e«:gosub29o:k=2 

200 gosubi3o:e«»e*+h»:gosub2bo:ifp*<>""thenprintp*v*:return 

205 PRINTE*Vt:RETURN 
210 V««=",X" :G0T0195 
215 V*-",Y":G0T0195 

220 gosub29o:ai=e:gosubi3o:e=ai+p+i:ifai>127Thene=p-255+ai 
225 v*-"l" ! s«0 : g0sub325 j ifbthenprintl* : return 
230 gosub3oo:printe»:return 

235 V»»" ,X)":G0T0215 
210 ¥♦-.">, Y" 



,265 



, 
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2*5 GOSUB290 S GOSUB130 ! GOSUB380 ! PRINT" ( "Z*W» : RETURN 

250 GOSUB290 SPRINT" "E» ! .' H* = E* ! GOSUE:Z90 : K = 2 : GOSUB130 

255 PRINT" ("E«H«")"SRETURN 

240 PRINT8PC < 8 > L«SPC < 7-LEN ( L» ) ) M»" A" ! RETURN 

265 GOSUB290 t PRINT" "E« ! I H«-E» S GOSUB290 : K=2 ! GQSUB130 ! E*=E*+Hi ! GOSUB280 

270 V*«"J":S=0:GOSUB325SIFL«<>" "THENPRINTL$: RETURN 

275 PRINTED RETURN 

280 E-0iFORI-lTOLEN<E*>SB-ASC<MID»<E«,I,l>)-48:iFB>9THENB=B-7 

285 E-E*16+B:NEXT»RETURN 

290 P-P+l 

295 E»PEEK<P> 

300 B-EtE»-"" 

305 H-INT<B/16> :B=INT<B-16*H> !B«=CHR«<B+48> :IFB>9THENB»=CHR*<55+B> 

310 E«-B»+E»:iFH>-lTHENB-H!GOTO305 

315 IFLEN<E»X2THENE»="0"+E* 

320 RETURN 

325 B— ItH-LL+l 

330 i«int<<h+b>/2mifl(I>=ethenb=i:l*=l$(i>:return 

335 IFL(I)>ETHENH=IiG0T0315 

340 B-I 

315 IFABS<H-B)>1THEN330 

350 IFSOR<LL>DM)THENB=OtL«=" "tRETURN 

355 LL*LL+i:iFL(IXETHENI=I+l 

3*0 forb=lltoi+istep-i:l(b)=l<b-d :l*(B)=l$<b-d:next 
345 l(i>=e!l«<i>=v*+mid«(str«(ll),2) 
370 b-0sl«=l»(i>:ife>pthenb=1 

375 RETURN 

380 b=-i:h=zz+i 

385 i=int < < h+b >/2> i ifzx < i ) =ethenz»-z* ( i ) : return 

390 ifzx<i>>ethenh=itgoto400 

395 B-I 

100 ifabs<h-b>>1then385 

105 zz=zz+1!ifzx<iketheni=i+1 

110 forb-zztoi+istep-i:zx<b)=zx(b-i>:z*(B)=z*(b-d:next:zz<i)=e 

112 IFS=2THENZ«(I)=U«:RETURN 

115 z»<i>="z"+mid*(str*<zz>,2>:z«=zi<i>:return 

120 ife<256thengosub380 s p» = z* : return 

125 b«-i:h»pp+i 

130 i=int<(h+b)/2>:ifp<i>=ethenp$=p*<i> :return 

135 IFP(I>>ETHENH=I:G0T0115 
110 B=I 

115 ifabs(h-b>>1then430 
150 ifpp>pmthenp$="":return 

155 PP=PP+i:iFP(IXETHENI=I+l 

160 forb=pptoi+istep-i:p<b)=p(b-i):p*(B)=p*(b-d:next:p(I)=e 

162 IFS=2THENP*(I)=W*:RETURN 

165 P*<I) = i, W'+MID*<STR*<PP),2):P»=P*<I):RETURN 

170 DATABRK,0RA9,?,?,?,0RA2,ASL2,?,PHP,0RA1,ASL12,?,?,0RA5,ASL5,?,BFL8 

171 OATAORA10 

175 DATA?,?,?,0RA3,ASL3,?,CLC,0RA7,?,?,?,0RA6,ASL6,?,JSR13,AND9,? 

180 DATA?, BIT2,AND2,ROL2,?,PLP,ANDl,ROL12,?, BITS, AND5, R0L5, ?,BMI8, AND10 

181 DATA?,?,? 

185 DATAAND3 , R0L3 , ? , SEC , AND7 ,?,?,?, AND6 , R0L6 , ? , RTI , E0R9 ,?,?,?, EORZ 

186 DATALSR2 

190 DATA?,PHA,EOR1,LSR12,?,JMP13,EOR5,LSR5,?,BVC8,EOR10,?,?,?,EOR3,LSR3 

191 DATA? 

195 DATACLI,E0R7,?,?,?,E0R6,LSR6,?,RTS,ADC9,?,?,?,ADC2,R0R2,?,PLA,ADC1 

500 DATAROR12,?,JMP11,ADC5,ROR5,?,BVS8,ADC10,?,?,?,ADC3,ROR3,?,SEI 

501 DATAADC7,?,? 

505 DATA?,ADC6,R0R6,?,?,STA9,?,?,STY2,STA2,STX2,?,DEY,?,TXA,?,STY5,STA5 

510 DATASTX5,?,BCC8,STA10,?,?,STY3,STA3,STX3,?,TYA,STA7,TXS,?,?,STA6,? 

511 DATA? 

515 DATALDY 1 , LDA9 , LDX1 , ? , LDY2 , LDA2 , LDX2 , ? , T AY , LDA1 , TAX , ? , LDY5 , LDA5 

516 DATALDX5,? 

520 DATABCS8 , LDA1 , ? , ? , LD Y3 , LDA3 , LDX1 , ? , CLY , LDA7 , TSX , ? , LDY6 , LDA4 , LDX7 , 
525 DATACPY1,CMP9,?,?,CPY2,CMP2,DEC2,?,INY,CMP1,0EX,?,CPY5,CMP5,DEC5,? 

530 DATABNE8,CMP I 10,?,?,?,CMP3,DEC3,?,CLD,CMP7,?,?,?,CMP6,DEC6,?,CPX1 

531 DATASBC9 

535 DATA?, ?,CPX2,SBC2,INC2,?,INX,SBC1, NOP, ? ,CPX5,SBC5, INC5, ?,BEOB,SBC10 

536 DATA?,? 

540 DATA? , SBC3 , INC3 , ? , SED , SBC7 ,?,?,?, S6C6 , INC6 , ? 

545 FORI = OTOLL:IFV*0""THENIFLEFT$(L»<I>,1><>U*THEN555 

550 e=l ( i ) t gosub30 o : printl* ( i ) spg ( 8-len ( l* ( i ) > > e* 

555 next:print:gotoi5 

560 fori=0tozz:e-z%(i> :gosub300 

565 printz* ( i ) spc ( 8-len ( z* < i > > > e* ! g0t0555 

570 fori"otopp:e-p<i> :c08ub300 

575 printp* < i ) spc ( 8-len < p$ ( i ) ) > e* i g0t0555 

60 s=2 ! input "name. , ad" j v* , e* : if v* o "end"thengosub280 ! gosub420 : got060 

605 G0T045 

1000 F0RI=14T033SPRINTICHR*<34)CHR*<I)CHR»<34)i INEXT 

1001 END 



/^OIIIO 
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OHIO SCIENTIFIC 

THE WIZARD'S CITY — 

search for gold in the dun- 
geons beneath the Wizard's 
city or in the surrounding 
forest. A dynamic adventure 
allowing progress in strength 
and experience. All OSI — 
cassette $12.95, disk $15.95. 
OSI HARDWARE 15% OFF 
RETAIL PRICES! 

GALACTIC EMPIRE — a strat- 
egy game of interstellar con- 
quest and negotiation. Com- 
pete to discover, conquer, and 
rule an empire with the com- 
puter or 1-2 other players. C4P, 
C8P cassette $12.95, disk 
$15.95. 

AIR TRAFFIC ADVENTURE — 

a real time air traffic simula- 
tion. C4P, C8P disks $15.95. 

Plus S-FORTH, FAILSAFE 
+ 2, RPV CONTROL, ADVEN- 
TURE, TOUCH TYPING, IN- 
TELLIGENT TERMINAL and 
more. Send for our free 
catalog including photos and 
complete descriptions. 

Aurora Software Associates 

37 S. Mitchell 

Arlington Heights 

Illinois 60005 
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The A2-GE1 
Graphics Editor 

for the 
Apple 1 1 



The A2-GE1 Graphics Editor is a collection of 
programs designed to put the power of A2-3D1 
and A2-3D2 graphics in your hands. 

The A2-GE1 includes Object Editor. Motion 
Programmer. Motion Playback, Slideshow Play- 
back, and a special A2-3D2 interface for BASIC 
programmers. 

With Object Editor you can create whatever 
objects you want in the colors of your choice. 
You can also type in whatever 3D text you want, 
and in different sizes. And saving an object is 
as easy as naming it. 

Then give the object names to Motion Programmer 

and see how the beautifully laid out keyboard 
controls will let you switch objects on or off, 
animate them, or add upper or lower case 2D 
text mixed right in. 

You can also record your entire presentation, 
animation and all, for later use with Motion 
Playback, or just take "computer snapshots" 
of scenes with Slide Show Playback. 

We've reached our goal of giving you the most 
sophisticated graphics utilities in the market- 
place . . . 

See them now at your dealer! 



Convenient 
graphics power. 



■■*■■»«! 



I 7 * 75 77 




LOGIC 

Communications Corp. 
713 Edgebrook Drive 
Champaign, I L 61820 
(217) 359-8482 
Telex: 206995 



Apple is the registered trademark ot Apple Computer Inc 



A2-GE1 Graphics Editor 

$34.95 on disk (48K and 
A2-3D2 required) 

A2-3D1 with 3D2 Enhancement* 

$84.90 on disk (48K required) 

*3D1 owners may update to 3D2 for $24.95. Contact SubLOGIC 
for details. 



For direct order, include $3 for UPS or S5 for first class mail delivery. 
Illinois residents add 5% sales tax. Visa and MasterCard accepted 



Pascal Tutorial 



Part 2 



Victor R. Fricke 

325 Ramapo Valley Road 

Mahwah, New Jersey 07430 



Filer Revisited 

The Apple Pascal Filer is a system pro- 
gram whose primary function is to 
manage and control the interaction of 
the system with disk files. One par- 
ticular file is handled in a special way by 
the system. This special file is the 
"workfile." When you Q(uit a session 
with the Editor, the Filer makes a copy 
of the text you were working on. This 
copy is placed on the disk as a TEXT 
file, with the file name of SYSTEM. 
WRK.TEXT. 

The Editor scans the disk directory 
of the disk from which you booted the 
system. If it sees a program called 
SYSTEM.WRK.TEXT, it automatically 
reads it from the disk and displays it on 
the screen. The Editor assumes that you 
want to work on the workfile. But what 
if you want to stop working on one file 
and start working on another? The Filer 
is provided with two commands for this 
very purpose. C(hange can be used to 
change the name of SYSTEM.WRK. 
TEXT, and G(et can be used to designate 
a different file as the workfile. 

C(hange 

Suppose you have been working on a 
business accounting package. You have 
just successfully compiled a General 
Ledger program, and now want to turn 
your attention to writing the Accounts 
Payable program. You need to save the 
GL program under a different name, like 
LEDGER.TEXT. There are already 
copies on the disk of both the text and 
code files for this program, but they are 
named SYSTEM.WRK.TEXT and 
SYSTEM.WRK.CODE. 



You could, of course, go back to the 
Editor and then Q(uit by using the 
W(rite option, but this is not very effi- 
cient. First, the Editor would read 
SYSTEM.WRK.TEXT back into 
memory when you invoke it, even 
though it is already there. Second, 
SYSTEM.WRK.CODE would not be 
renamed by this process. 

A better method would be to go into 
the filer, and select the C(hange option. 
The prompt line will say: 

CHANGE? Respond by typing 
SYSTEM.WRK.TEXT 

The system answers with: 

CHANGE TO WHAT? You can now 
answer LEDGER.TEXT. The system 
response will be SYSTEM.WRK.TEXT 
-^LEDGER.TEXT. 



After you do this, there is no longer a 
file named SYSTEM.WRK.TEXT in the 
disk directory. The file is still there, but 
its name has been changed. Now when 
you enter the Editor, there is no workfile 
to be automatically read from the disk. 
You can start a new one, and when you 
Q(uit, it will be saved as SYSTEM. 
WRK.TEXT. 



The previous sequence of com- 
mands shows how to change a file 
name. This can be made even simpler. 
The two responses given above can be 
made at the same time, if they are 
separated by a comma. Thus, in 
response to CHANGE? you can type 
SYSTEM. WRK.TEXT,LEDGER.TEXT 
and get the same result. 



If you want to change several files 
with similar names, you can use the 
"wild card" characters, '=' and '?'. 
Suppose your diskette contained the 
following files: 



SUPER. LEDGER.TEXT 
SUPER.PAYABLE.TEXT 
SUPER.RCVABLE.TEXT 
SUPER. STARTREK 

If you wanted to rename all these files 
without the SUPER prefix, you could 
C(hange each name, one at a time. 
However, there is an easier way; use 
the "wild card." 

From the Filer press C(hange. When 
asked CHANGE? type SUPER. = ,= 
and the response will be 

SUPER. LEDGER.TEXT ~> 
LEDGER.TEXT 

SUPER.PAYABLE.TEXT -->■ 
PAYABLE.TEXT 

SUPER.RCVABLE.TEXT -->- 
RCVABLE.TEXT 

SUPER.STARTREK -->• 
STARTREK 

The system selects those files that 
have the prefix SUPER, and any suffix 
(represented by the wild card character) 
and changes its name to just the suffix. 

If you wanted to change the name of 
all the accounting files, but leave SUPER. 
STARTREK alone, you could have 
followed one of two options. You could 
have answered the prompt with 



SUPER. = .TEXT, = .TEXT 



or, 

SUPER.?,? 

When '?' is used instead of ' = ', the 
system stops before each file name 
change and requests verification that 
the change of name is desired for that 
file. It will prompt with 

CHANGE SUPER.LEDGER.TEXT ? 

If you respond by pressing 'Y', the 
response will be 
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SUPER.LEDGER.TEXT -4. 
LEDGER.TEXT 

If you press any other key, the change 
will not be made, and the system will 
continue looking for more file names to 
change according to your instructions. 
In this way you can examine each name 
change before it is made and select 
those which you really want to change. 

When there is no workfile defined, 
or you have just renamed SYSTEM. 
WRK.TEXT, the system is not able to 
automatically load the workfile. If you 
want to designate a different file as the 
workfile, select the Filer command 
G(et. The response will be 

GET? 

You then respond with the name of 
the file you want to be the workfile. 
But there is one trick on a one-disk 
drive system like mine. The file you 
select by the G(et command has to be 
physically on the system diskette (the 
one with the system programs on It). If 
it is on another diskette, transfer it to 
the system diskette before using the 
Glet command. 



The N|ew command is used to 
delete the current workfile. If there is a 
SYSTEM. WRK.TEXT or SYSTEM. 
WRK.CODE file on the disk, the 
response to the N(ew command is 

THROW AWAY CURRENT 
WORKFILE? 

If you answer 'Y', the workfiles are 
removed from memory and the disk 
directory. If you press any other key, 
the N(ew command is cancelled. If 
there is no SYSTEM. WRK.TEXT or 
CODE file and you have designated a 
workfile by the G(et command, the 
N(ew command de-designates it, but 
does not remove it from the disk. 



To find out what the system config- 
uration is, The V(olumes command is 
used. This command is inherited from 
the UCSD System, which on occasion 
is run on large computers, small 
computers, time-sharing computers, or 
other hardware. The system software is 
set up to deal with all the possible hard- 
ware variations by regarding each device 
it can communicate with as a volume. 

When you select the V(olumes com- 
mand, the display, for a single drive 
system, will look like this: 



VOLS ON-LINE: 

1 CONSOLE: 

2 SYSTERM: 
4 # APPLEO: 

ROOT VOL IS - APPLEO: 
PREFIX IS - APPLEO: 

The volume number designations, 
since they were set up for the UCSD 
system, do not correspond to peripheral 
slot numbers. For example, Volume 4 
represents the on-line disk in drive 1, in 
slot 6. 

The volume designated as CON- 
SOLE: (Volume 1) is the video display,- 
Volume 2, SYSTERM:, is the keyboard. 
A '#' symbol in front of the volume 
name indicates that it is a "block- 
structured" volume, or diskette. 

The "ROOT VOL" referred to is the 
volume from which the system soft- 
ware was booted up. The "PREFIX" is 
the name of the default volume; that is, 
the volume that is assumed when only 
the file name is given to the system. 
This is ordinarily the same as the root 
volume, but can be changed by using 
the P(refix command. 

For further information about 
system volume numbers and what peri- 
pheral slots they can represent, refer to 
Appendix D in the back of the Oper- 
ating System Manual. 

Directory Commands 

There are several commands which 
access the directory or modify its 
contents. 

Z(ero Wipes out the directory. Pro- 
grams are still on the disk, 
but the system can't find 
them because the directory is 
empty. The only time this 
might be of any use is if you 
want to re-use an old disk. 

R(emove Used to delete a file from the 
directory. The file is still on 
the disk, but after a Re- 
move, the system thinks 
that the area where the file is 
recorded is available for use. 
Subsequent file creation can 
wipe out the file just 
R(emoved. 

K(runch This command is used to 
move the existing files to- 
gether on the disk, making 
all the remaining unused 
space on the disk contigu- 
ous. Since this method in- 
volves reading files and 
writing them elsewhere on 



the disk, this command 
should be used sparingly. A 
disk error or power failure 
during a K(runch operation 
could cause permanent loss 
of some files. 

Mjake This command is used to 
create a dummy file and put 
its name into the directory. 
The only reason I can see for 
doing this is to try to recover 
an inadvertantly R(emoved 
file. For example, I R(emove 
a file called JUNK.TEXT. I 
realize that I have just killed 
my only copy of a useful file 
by that name. When I use the 
E(xtended directory list com- 
mand, I see an area of nine 
blocks between two files 
marked <UNUSED> I 
think that might be where 
JUNK.TEXT is recorded. 

I use the M(ake command 
and give it JUNK.TEXT[9] as 
the name of the new file. The 
9 in the square brackets is 
the number of blocks to allo- 
cate for the file. This pro- 
cedure will recover the lost 
file. 

If you use the M(ake com- 
mand and use a file name 
without the size specified in 
square brackets, the new 
dummy file will still be 
made, and it will fill the 
largest unused area. If you 
use an asterisk in the square 
brackets, the new file will 
occupy either one half of the 
largest unused area, or the 
next-to-largest unused area, 
whichever is larger. 



Bad Disk Blocks 

The system provides a command, 
B(ad blocks, which instructs it to scan 
trie disk for flaws and identify them. 
This involves a "CRC," or "cyclic 
redundancy checksum." When a block 
of data is recorded on the disk, the CRC 
is calculated and stored in the sector 
along with the data. 

When the B(ad blocks command is 
selected, the system reads each sector, 
calculates the checksum for the data in 
that sector, and then compares the 
result with the CRC stored on the disk. 
If after ten attempts, no match occurs 
between the calculated and recorded 
checksums, the system concludes that 
a bad block has been found. 
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Make note of the bad blocks found 
by the scan. Although they cannot be 
fixed, the system can mark them as 
bad. You invoke this operation by 
using the X( amine command. This 
causes the system to mark the bad 
blocks as a file with the suffix .BAD. 
This is important because in a K(runch, 
the system will not attempt to move 
any portion of a file into the bad block. 

Unfortunately, the file which con- 
tained the bad block will not be 
recovered, but at least you will not 
jeopardize any other good files. It is a 
good idea to use the B(ad blocks and 
X(amine commands right away when 
you first initialize a diskette for Pascal 
files. 



Compiler 

The Pascal Compiler is a translation 
program. It translates a Pascal text into 
a different language, "p-code." The 
Apple is a willing servant, and will 
carry out any instruction it receives, as 
long as it can understand the instruc- 
tion. Of course, the only instructions it 
understands are those written in 6502 
machine language. 

Normally, humans do not com- 
municate in machine language; it is 
hard to deal with binary bytes. The 



closest one usually comes is assembly 
language. But fortunately, the Apple 
monitor understands assembly lan- 
guage, and is prepared to interpret it to 
the 6502 CPU. The mini-assembler 
system program does this. 

Carrying the analogy a step further, 
assembly is not a comfortable language 
for the average programmer. Most 
would rather speak BASIC, since it 
resembles English. Fortunately, the 
Apple also has a BASIC interpreter. 

An interpreted program is inherently 
slower-running than it could be, since 
each statement is decoded as it is en- 
countered. If a loop is executed a thou- 
sand times, the loop statements are 
decoded a thousand times. It would be 
much more efficient to do the decoding 
only once, translate into machine code, 
and then run the translated program. 

A compiler takes a high-level lan- 
guage program, understandable by a 
human, and translates it into a low- 
level language that the CPU under- 
stands. The advantage is that the low- 
level language is more concise, and 
therefore uses less valuable memory 
space, and runs faster. The disadvan- 
tage is that if you make one small 
change, the program must be recompiled. 
This is usually not much of a problem, 
except during program development. 



Now Pascal, a new language designed 
from scratch to have a lot of desirable 
features, eliminates a lot of the 
weaknesses and faults of existing 
languages. The designers wanted it to 
be a compiled language, but they faced 
a problem: different computers spoke 
different machine languages. 

The Apple speaks 6502, the TRS-80 
Color Computer speaks 6809, and 
other machine languages for other pro- 
cessors abound. A compiler is a very 
complex program, and writing a Pascal 
compiler for each of the possible pro- 
cessors multiplied the problem. 

The solution was to invent a new 
low-level language, "p-code," and to 
write only one compiler, Pascal to 
"p-code," the universal low-level 
language. Now, to use the Pascal sys- 
tem software on a new microprocessor, 
only a "p-code" interpreter need be 
written. Interpreters are much easier to 
write than compilers. 

A Pascal program is a text file on the 
disk. All the compiler does is read the 
text file, translate it into "p-code," and 
write a code file onto the disk. Very lit- 
tle interaction with the user is needed 
for this type of operation. However, 
there are a few options available. 
Rather than using a prompt line ap- 
proach, the compiler options are se- 



LETTER QUALITY WORD PROCESSOR PRINTER/TYPEWRITER 

FOR APPLE, ATARI, COMMODORE, NEC, OSBORNE 1 , TRS 80 and others 



OLYMPIA ES100/101 

• 92 character electronic 

keyboard 

• 8 character buffer memory 

• Dual pitch, 10 and 12 

• 17.5C.P.S. 

• All settings from keyboard 

• Auto correction 

• Daisy type print mechanism 

• Cartridge ribbons 

• 14 1/8 inches writing line 

• 1400 dealers nationwide 



REN TEC ES 

• Installation in 15 minutes 
using existing ES1O0/101 
cables 

• CMOS logic for minimal 

drain on ES10O power 
supply 

• Hi or low true status bits 

• Accepts RS232 serial with 

7 crystal controlled Baud 
rates 

• Accepts Centronics parallel 

interface 

• Selectable auto, line feed 





RENAISSANCE 

TECHNOLOGY 

CORPORATION 

3347 VINCENT ROAD 

PLEASANT HILL, CALIFORNIA 94523 

(415)930-7707 



$1495.00*ES100 TYPEWRITER & INTERFACE 

***** 

NEC Dot Matrix Printer 

100 CPS 

Bidirectional printing 
Friction and tractor feed 
Parallel Interface 
Single ribbon cartridge 



$295.00 INTERFACE 
Sug. Retail 

795.00 



NEC Monitors 

12" Green Screen 

12" RGB Color 

12" Composite Video 

ATARI 10-Key Accounting Pad 
DEALER INQUIRIES WELCOME 



285.00 

1095.00 

430.00 

124.95 
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lected by means of compiler directives 
embedded in the text file. 

The compiler directive looks like a 
comment. A Pascal comment is enclosed 
by parentheses and asterisks: 

(• THIS IS A COMMENT *) 

Comments are ignored by the com- 
piler. But, compiler directives are not 
because they start with (*$, not just 
with (*. Compiler directives look like 
this: 



(*$S + 



•$L- 



There are really only three compiler 
directives that are of any use to the 
beginner. These are the swapping direc- 
tive, the list directive, and the include 
directive. 

The swapping directive is used to 
conserve memory working space. The 
compiler is held in memory while it is 
operating. If you look at a directory 
listing, you can see that SYSTEM. 
COMPILER occupies 71 blocks of 512 
bytes each, or over 35K of the available 
memory space. 

The swapping directive tells the 
system to divide the compiler into two 
parts, and to swap the parts in and out 
of memory. Only the part needed is in 
memory at any time. This frees addi- 
tional memory space and allows the 
compilation of larger, more complex 
programs. 



1 


1 


1:D 


I 


(*$L CONSOLE: *) 


7. 


I 


1st) 


1 


PROGRAM SUMS; 


3 


1 


l:D 


3 




4 


1 


l:D 


3 


CONST 


5 


1 


1:0 


3 


MAXINT = 100; 


6 


I 


1:0 


3 




7 


1 


1:0 


3 


VAR 


3 


I 


1:D 


3 


SUM : REAL; 


9 


I 


1:0 


5 


COUNT: INTEGER; 


10 


1 


1:0 


6 




IX 


1 


l:D 


6 




1? 


1 


1:0 





BEGIN 


13 


I 


1:1 





SUM := 0; 


14 


1 


1:1 


8 


FOR COUNT := 1 TO MAXINT DO 


15 


1 


1:2 


19 


SUM := SUM+COUNT; 


16 


1 


1:2 


37 




17 


1 


1:1 


37 


WRITELNf 'SUM= ', SUM) 


\H 


1 


1:1 


77 




19 


1 


1 :0 


77 


END. 



This option is highly recommended 
for development of programs of any 
useful size. It is invoked by placing the 
compiler directive 

(*$S+ *) 

at the very beginning of the text file. 
You may place comments before it in 
the file, of course, since comments are 
ignored by the compiler. 

When the compiler is running, you 
get very little information about its 
progress. A dot is placed on the screen 
as each line of text is compiled, and the 
names of procedures and functions ap- 
pear as their compilations start. The re- 
maining space in memory appears in 



CBM/PET? SEE SKYLES ... CBM/PET? 



PET owners everywhere sing 

Jj Thanks for the Memories J J 
to good old Bob Skyles 

. . . they should . . . because Bob Skyles is the only complete 
source for memory boards for any PET ever sold. Old Bob 
won't forget you. 

And ihc Skyles memory systems have (he highesi quality control of any computer prod- 
uct ever. Over 100 million bits of Skyles memory boards are already in the field; you can 
count the total number of failures on the fingers of one hand. First quality static and 
dynamic RAMS, solid soldered on first quality glass epoxy. That is why they are guaran- 
teed — in spite of the new lower prices— for a full two years. 

The boards connect directly to the data bus on your board with ribbon cable and 50 pin 
connectors that keep the data bus open to the outside world. Installs in minutes without 
special tools or equipment... just a screwdriver. 

Because of our new dynamic memoty design, and to celebrate the Skyles' Third Annual 
Survival Anniversary, here are the smashing new prices: 

The SK Memory System originally $250.00 now $200.00 Save $ 50.00 

The 16K Memory System originally $450.00 now $300.00 Save $150.00 

The 24K Memory System originally $650.00 now $400.00 Save $250.00 

. . . For any PET ever made. When ordering, just describe your PET by model number 

and indicate the amount and type (or brand) of memory currently in the unit. 

Shipping and Handling (USA /Canada) S3.50 /Europe/ Asia) $15.00 

California residents must add 6%/6'/:% sales tax, as required. 



Skyles Electric Works 

231E South Whisman Road 
Mountain View, California 94041 
(415) 965-1735 



Visa/Mastercard orders: call tollfree 
(800) 227-9998 (except California). 
California orders: please call (415) 
965-1735. 



/lAiaO "■ S31AMS 33S <JL3d/IAiaO" c/) 
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square brackets. When an error is 
detected, the compilation stops, and 
the line number where the error was 
detected is indicated. 

The compiler translates the pro- 
gram one line at a time, and it numbers 
the lines for reference purposes. It 
would be useful to see the numbered 
lines as the compilation progresses, 
just so you could fix the errors more 
easily. The list directive does this for 
you. If you include 

(*$L CONSOLE: *) 

at the head of your program, you will 
get a detailed listing on the screen as 
the compilation progresses. It will look 
like listing 1. 

The numbers in the first column are 
the line numbers. In the second col- 
umn the segment number is indicated. 
Segment numbers are of use only to the 
advanced Pascal programmer. In or- 
dinary programs, the segment number 
will always be "1". 

The third column contains two 
numbers, separated by a colon. The first 
number is the block number. Each pro- 
cedure, function, and the main program 
are blocks, separately named. The se- 
cond number is the indentation level. A 
'D' means declaration; the numbers 
show the level of nesting of loops and 
other control structure in the block. The 
final column of numbers is intended for 
use with a debugger subsystem, and is of 
little use for the beginning programmer. 



The compiler directive (*$I FILE- 
NAME * ) is called the Include directive. 
It causes the compiler to fetch addi- 
tional text from the file named FILE- 
NAME and insert it into the textfile be- 
ing compiled. In this way, you can break 
a large file into smaller pieces and work 
on them separately. As an example, you 
could use a procedure from another pro- 
gram that is already known to work. 

JMCAO 
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* SOFTWARE FOR OSI 

Z VIDEO GAMES 3 X ■ $1".95 

™ Three games Meleor Mission is an asteroids game Space Wars is a bailie between 
>r two starships Meteor Wars is a combination ol the two above games All three are 
•"^ in machine language with last, real time action, and super graphics 

"fc ADVENTURE: IMMORTALITY .... y$V. $1 1 -95 

-& You are an intrepid explorer searching lor the tabled -Oust ot Immortality" This is 
L the largest adventure yet available lor 8K OSI 1 With hidden room load so you can t 
•$1 cheat 

■fc SUPER BUG! $ 6 - 95 

J* Here's a super-tast. BASIC/Machine language hybird race game Ten levels ol 
•* difficulty and a mlinately changing track will keep you challenged 

# STARGATE MERCHANT $9-95 

-& You are a trader in the distant tuture. traveling through stargates' to get to various 
. star systems Part video game, part board game, always challenging 

? ADVENTURE: MAROONED IN SPACE $1195 

"*^ An adventure that runs in 8K! Save your ship and yourselt from destruction 

* DUNGEON CHASE $995 

"V A real-time video game where you explore a twenty level dungeon 

-£ DISASSEMBLER $11.95 

>* Use this to look at the ROMs in your machine to see what makes BASIC tick 

r^ Reconstruct the assembler source code ol machine language programs to 

K, understand how they work Our disassembler outputs unique suftixes which 

r* identity the addressing mode being used, no other program has this 1 

M m SUPER! BIORHYTHMS $14-95 

W A sophisticated biorhythm program with many unique leatures 

For all BASIC-m-ROM systems Selected programs available 
on disk Color and sound on video games. ^JUgp^ 

Write tor FREE catalog 

IFor International requests, please supply 2 o* poslaqel 

AniAM SOFTWARE ASSO. 

r -^^ X\ I \J !>• 117 Main St. Ossining. NY 10562 




THE ultimate in SPEED and 
language POWER for the APPLE II : ' 

THE INTEGER BASIC COMPILER 



SPEED IMPROVEMENT BY A FACTOR OF 10 TO 20 OVER 

Apple's BASIC interpreter - 15 to 30 over Applesoft! 

no lan6uage card necessary ! 

Optimize code for your speed/space reouirements. 

Object code and run-time system are completely 
relocatable - use memory the way you want to ! 

Many powerful BASIC language extensions: 

- Full string length of 32767 - no 255 limit ! 

- CHR$, GET and KE V functions, 

- Direct Hl-RES graphics support. 

- HOME, INVERT, NORMAL, FLASH, and more ! 
Many applications - existing integer programs 
can be easily converted to run on any apple ii ! 

Compiler reouires: Apple II (or II plus with 
integer or language card), 48 k and dos 3.3. 
Supplied on 2 disks with complete documentation. 

Price: * 119.50 

Dealer Inquiries invited. 
(Calif, add 6.55 sales ta». Foreign add tS.OO air Mil 1 

GALF0 SYSTEMS 6252 Cam i no Verde 
San Jose, CA 95119 

• Apple. Applesoft - Trademarks of Apple Computer Co. 



i 
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utility dly 

21 of our most-askcd-for Apple Utilities 



48K App*esott ROM 



by Bert Kersey 

For YOUR 8tg Apple-Our 21 most <*sked-f or Apple Ut*0es on one brg 
d ■-. -Li*i Formatter makes property spaced 4 indented listings with 
printer page breaks Each program statement is on a new hne with If- 
Then*s4 loops caied out. a great de-bugger! Catalog In any number 
o( column* ft any page-width to CRT or printer. Automatically post 
(he Run-Number 8 last-used Date m your programs. Make any 
command Im-Hlbie m your ksOngs; Access program Irves in memory 
for garbage repa* * "iflegal" alteration; Quickly sort & store info on 
disk; Run any Applesoft file while another stays intact, Move lines 
withm your programs. Renumber to 65535; Save inverse, INVISIBLE * 
trick Me names; Convert dec to hex & binary, or INI to FP, Append 
programs; dump the text screen to any printer More too: 91 
frog rams Total) 



PLUS . . . APPLE TIP BOOK NUMBER THREE! 

40 PAGES of new tips, tricks & articles- "'DOS Trickery," "Copy 

s," 'Programming the Reset Key" A much rr 
. derstandaWe explanations of how eacn u<(ty Progra 
One of the best Apo*e kjarrung tools on the market today' 



• Utility Crty on Applesoft Disk 
_ V" *0 page Beagle Bros Apple lip Book = 3 
LZ7 »/ Apple PEEKS, POKES & POINTERS Chart 



alpha plot 

Hi-Res Apple Graphics/Text Utility 

by Bert Kersey A Jack CauMy 48K REQUIRED 

HI-RES DRAWING: Create hires picture* * charts, 
appendablc to your programs. Keyboard or Paddle control; Op- 
tional Xdraw Cursor (see Snes before you draw!); Any color mix or 
REVERSE (opposite of background); Grcies, Boxes & Elapses, ruled or 
not Bonus Programs too -SCRUNCHER stores rn-res n as ItOe as 1 / 3 
normal disk space. SHIFTER transfers any portion of the hi-res screen 
Abo superimpose hi-res images and convert Mi-Res to lo-Res & back 
for fascinating abstracts' 

HI-RES TEXT: Beautiful upper & lower case with Descenders, 
cotor or reverse; Posftionabte anywhere (NOT restricted by Htabs & 
VtaOs) Professional looking PROPORTION A l SPACING) Adjustable 
Type Size, Leading (line spacing) * Kerning (letter spacing). Multi- 
directional typing; up, down, even backwards! 



I PIUS . . . APPtE TIP BOOK NUMBER FOUR! 
40 PAGES of tips for making the most o' your Apples ad> 
graphics capacities Alpha >r ' 



. ' Alpha Plot on Applesoft Disk 
I ]/ 40-page Beagle Bros Apple Tip Book tt a 
J • Apple PEEKS, POKES & POINTERS Chart 
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Apple Utility Disks! 

With Free PEEKS & POKES Wall Chart! 

KJnot available^ 
separately) J 



4315 Sierra Vista 
San Diego, 
CA 92103 
714-996-6400 



WITH EACH ORDER, YOU WILL RECEIVE . . . 
uJ Do* Bou, Utility Ctty or Alpha Plot on Applesoft Disk 
U A 40-page Apple Tip Book (each entirely different) 
O An 11x17 Apple PEEKS, POKES A POINTERS Chart 



do/ bo// 

DISK COMMAND EDITOR 

by lert Kcncy A Jack Cauldy 

A classic utility you wiH ENJOY* Rename Commands: "Catalog" can 
oe "Cat," etc. Savc-Protcct your programs; Unauthorized copy at- 
tempts produce "Not Copyable" message l*ey Program Selection 
from catalog (extremely handy!). Catalog Customiier— Change Disk 
volume message to your title. Omit or alter file codes; Catalog by file 
type, etc. Rewrite Enor Messages— "Syntax Error" can be "Oops!" 
or anything you want! 

All of Dos Bom's change fcaure* may be appended to your pro- 
grams, so that anyone using your disk* on any Apple (booted or 
not) win be formatting DOS the way you designed III 



PIUS . . . APPLE TIP BOOK NUMBER TWO! 

With vakiaoie DOS information: Poking Around in 0OS." "Making 
Programs Unstable" 'Two-Sided Cwk Tips," Care of Your C 
: Peeking & Poking," "3 2 vs 3 3," etc 



ONLY 

$24. 

HI SO SfliOO**) 



v/ Dos Boi* on Applesoft Disk 

• 40-page Beagle Bros Apple Tip 8ook = 

• Apple PEEKS, POKES A POINTERS Chart 



MINIMUM 32k REQUIRED 



TG-: 




AT yoyfcV- -■ 

APPLE VfALERNcW- 

OR ORPER By PHONE 

7 AT ANY HOUR- *- 

Ask around about WmmBUK^ a ^ K Blos Software 
Our programs are practical, friendly & user-oriented, and 
always come with an amazing amount of documentation & 
juicy Apple information. If your dealer doesn't have our stuff, 
get on his case about it, or order directly from us. We ship alt 
disks & books WITHIN 48 HOURS 
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BONLP5WITH ESCH DISK! 

__ POKE your Apple all night long with this handy 11x17 refer- 
:^~-: ence poster! The most useable PEEKS, POKES, POINTERS & 
£*5gJri CALLS scrounged up from every source Imaginable! A great 
;vm3J companion to our original Apple Co mmand Chart. 

MasterCard, VISA or uw 2? 

Nationw.de: 800 |54 *ou ext.827 
California: 800 -swe i w 

Or Order by mail separate sheetft 

■■■■■■■■■■■■■■■■ 

RUSH! The disks checked below 

Plus The Tip Book and PEEKS & POKES Chart! 

D imUTyCITY D AIPHAPIOT D DOS BOSS 

($31) (S41) (195.50) 

(Prices include Flrsl Class Snipping. Caw. residents add 6% > 

Speciry 

NAME$= □ 3.2 " D 3.3 

ADDRS= 



CITYS=. 



_ZIP=_ 




VISA 



VISA/MASTERCARD: 

Include Account No. 

& Expiration Date. 

Mail US. check, money order or Visa/MC Numbers 
to BEAGLE BROS, Dept. T 
4315 Sierra Vista, 
San Diego, CA 92103 

Telephone (714) 296-6400 

Please add $4.50 lor shipping outside US or Canada 
COD orders, add »3 California residents, add 6%. 
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Bill Budge, creator of 
"Raster Blaster," needs it: 

"... I'll never write another 
program without BugByter!" 



FEATURES 
INCLUDE: 

•All registers displayed 

•Compatible with all 
Apple languages 

| •Completely relocatable 

•Full hex and ASCII I/O 

•Multiple options while 
in trace mode 

•Literal and transparent 
breakpoints 

•Resident assembler 

•Resident disassembler 

•User-definable screen 

•Ram screen dump in 
hex and ASCII 

•Comprehensive 
documentation 

•Single keystroke 
operation 

•Instruction cycle 
counter 

•Hexadecimal/ 
decimal 
conversions 



•Can run in add-on 
ram card 







Who else needs BugByter? 

. . .Apple* users who want to learn machine language. 

. . . Apple programmers in need of a complete 6502 
debugging tool. 

. . . Educators who need to demonstrate the operation 
of the Apple's central processor. 

. . . Software professionals who need to display and 
control all 6502 registers. 



BugByter 



is 

NOW AVAILABLE AT $39.95 

on diskette for Apple II or Apple II + 

from 

COMPUTER-ADVANCED IDEAS, INC. 

1442A Walnut Street, Suite 341 

Berkeley, CA 94709 

(415) 526-9100 



"Apple is a registered trademark of Apple Computer. Inc. 
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Flags 
and Boolean Algebra 
in Microsoft BASICS 



Microsoft BASICS, unlike other 
BASICS, can handle the 
assignment of Boolean 
variables. Furthermore, OSI and 
PET versions work on the bit 
level. Both features allow 
implementation of some very 
powerful program structures. 



Mark Guzdial 

1451 Seminole 

Royal Oak, Michigan 48071 



Flags are variables that have only two 
values: a 'true' and a 'false'. They're 
heavily used in languages other than 
BASIC, such as PL/1 and FORTRAN, 
but this doesn't mean that they can't be 
used in BASIC and with practical 
benefit. 

For example, a flag named ER could 
be set true upon an error condition. A 
statement using it might be 'IF ER 
THEN PRINT ER$' thus printing an er- 
ror message upon an error condition. Or, 
a flag called LP could indicate the 
presence of a line printer, so a print 
message might be 'PRINT A$:IF LP 
THENLPRINT A$'. 

Flags can be put to their greatest use 
by combining them with Boolean 
algebra (as discussed by Marvin Dejong 
in MICRO 22:29). In some other 
languages, flag variables are referred to 
as Boolean. For example, we can com- 
bine our last two examples by printing 
an error message to the printer with 'IF 
LP AND ER THEN LPRINT ER$'. 

In BASIC, if the flag is non-zero (a 
positive or negative number), it will be 
considered true and the statement after 



the THEN will be executed. If the flag is 
zero, it will be considered false and the 
statement after the THEN will be 
skipped. 

What really makes flags usable in 
Microsoft BASIC is that BASIC can 
actually handle the assignment of true 
and false values. For example, the state- 
ment A = B<2 is actually a valid state- 
ment in any Microsoft BASIC (including 
PET BASIC, OSI, Applesoft, and even 
Apple Integer BASIC, though it wasn't 
written by Microsoft). 

The explanation lies in the structure 
of BASIC. Discounting strings, there are 
two main types of expressions: arith- 
metic (those using addition, subtrac- 
tion, functions and generally working 
with numbers) and logical (those that 
make comparisons such as = , <or > ). 
In PET, OSI and Apple BASICs, the 
evaluation of these expressions is done 
by the same routine. That means that 
the expression between the IF and the 
THEN is evaluated the same way as the 
expression to the right of the ' = ' sign in 
the assignment statement. Therefore 
A = B + 2 is just as valid as A = B < 2. 

We can now also see what happens if 
we try the statement A = B = 0. The 
variable A will be set to true or false 
depending on whether or not B is equal 
toO. 

Let's digress slightly from our 
discussion of flag variable usage to 
discuss this evaluation routine. We 
know that BASIC can only put a number 
into the variable A, so what number 
does BASIC put into A when we use it to 
signify a true or false condition such as 
A = B<2? 

If B is not less than 2, A will be set to 
in all of these BASICs. From what we 
know about false conditions, this 
sounds correct. But it's true values that 
get tricky. If we consider Boolean 
algebra, true should be the complement 



of false, or TRUE = NOT FALSE. So, 
logically, if B is less than 2 (using our 
example), A should get the value of 1 — 
the complement of 0. 

In the Apple, both Integer and Apple- 
soft BASICs return 1 for true values. But 
on OSI and PET BASICs, A will be set to 
- 1! And believe it or not, this is a dis- 
tinct advantage, though not a logical one. 

In PET and OSI, flags and Boolean 
algebra are considered at a 'bit level' not 
as their logical values. This means that 
PET and OSI consider all numbers in 
terms of their binary digits. So the com- 
plement of is: 

NOT 0000 0000 =11111111 



For those of you familiar with two's 
complement notation (a method of 
representing negative numbers in 
machine code), you will recognize that 
the NOT of is -LA NOT of -1 
would give you back the which is cor- 
rect. Also, since - 1 is non-zero, it will 
be recognized as true so it will function 
correctly. 

Note that while the Apple format 
can handle a - 1 as being true (since it is 
non-zero), the OSI and PET formats can- 
not handle a 1 as being true if you're 
using Boolean algebra. A NOT of 1 
would give you (in PET or OSI): 

NOT 0000 0001 =1111 1110 

which is a two's complement -2, 
which (since it's non-zero) is still true. 

This can be a distinct advantage. 
Though logically it's considerably easier 
to work with the Apple method of hand- 
ling true and false, the bit-oriented way 
of the PET and OSI gives you another 
dimension of programming. For example, 
what is printed with the statement: 

'PRINT 2 OR 4'? 
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In the Apple, you are logically ORing 
two non-zero (or true) values which 
leaves a true result, so a 1 is printed. 
However, on the PET or OSI a 6 is 
printed because 

0000 0010 
OR 0000 0100 



0000 01 10 = Decimal 6 

This leaves us with the capacity of doing 
some very interesting computations 
with the PET or OSI computers. 

Let's say, for example, that the 
variable A must be assigned a value based 
on variable B, but the relationship is 
totally illogical such as: 

IF B=1 THEN A = 5 
IFB = 2THEN A = 3 
IF B = 3THEN A = 7 



One's first thought would probably be to 
either use multiple IF..THENs or an 
ON.. GOTO. But by using flags, this 
assignment can be done on a single 
statement: 

A=-(((B = 1)*5) OR ((B = 2)*3) 
OR((B = 3)*7» 



We know that each of the condi- 
tional statements (B = n) will be 
evaluated to either - 1 or 0, depending 
on whether it's true or false. Only one of 
the three clauses can be true, so only 
one can evaluate to a number while the 
other two evaluate to zeros. A number 
logically ORed with two zeros leaves the 
number. The negative sign at the begin- 
ning is necessary since B = n will be 
evaluated to a negative 1 if true. 



This type of statement cannot be 
used on the Apple because the statement 
will logically evaluate the ORs to either 
a 1 or 0, not the number that will be 
found. 



Using Boolean algebra with flag 
variables opens up a whole new world of 
programming in BASIC. Complex IF.. 
THENs can be broken down, IF.. THEN 
..ELSE structures can be implemented 
and sometimes, IF.. THENs can be 
avoided completely. I hope that you find 
the use of flag variables in 6502 BASICs 
to be beneficial to your programming in 
BASIC. 

JMCRO 




DRAGON 
BYTE 



SOFTWARE 

PRESENTS 



UNIQUE PROGRAMS 
FOR OHIO SCIENTIFIC 
■ POLLED KEYBOARDS ' 
2001 /2002PC — States & Capitals 

Capitals S. States One Cassette 
2003PC — Capitols of the World 
2004PC — Protectorate Capitals 
2005PC — Presidential Campaigns, 

1788 to 1980 
All programs except Presidential 
Campaigns available for serial terminal. 
Specify number without PC suffix. 
CASSETTE. .$9.95 Diskette. $12.95 
All five on one disk . . $29.95 
C-10 Blank Cassettes . . . 10/$4.99 
SPECIAL! OSI Disk Expansion 

Manual $14.95 

OSI Expansions, conversions, and 
Floppy Disk Drive Maintenance 
$35.00/hour — $35.00 minimum 

COMPLETE SELECTION 
OF ELCOMP BOOKS 
SounDustrial Electronics, Inc. 
4066 Polaris Avenue, 
Joshua Tree, CA 92252 

(7141 366-9572 



r 



\ 



AIM-65/SYM-PET-KIM-6800 

Universal Interface Board Converts AIM-65/SYM 
Into Professional Data Logger 



MINI MOTHER 
BOARD 




ADDRESS 

SELECTION 

(CLOCK, MUX 

A/D) 



16 CHANNEL 
MUX 



BANK SELECT. 
ADDRESS 
(MEMORV) 



16 A/D INPUTS 

■ ± 15 VOLT 

POWER 

SUPPLY 

INPUTS 



\ COLUMBUS INSTRUMENTS INTERNATIONAL CORPORATION 

Suppinr of Individual inatrumartta and total •naaavflno. ayiMma 



960 N. HAGUE AVE., COLUMBUS. OHIO 43204 U.S. A 
PHONE: (614) 488-6176 TELEX: 246514 



(Also connects to PET or KIM with adapter cable. 
Adaptable to other 6502 and 6800 systems) 

CONTAINS: 

* 12 bits, 16 channels, fast A/D converter 

* space for additional 16K RAM memory or 32K 
EPROM (or combination) 

* real time clock/calendar with real time interrupt 
capability and 10-year lithium battery backup 

* plugs directly into AIM-65 expansion connector 
with the help of a mini-mother board which 
supports up to three interface boards 

* supplied with supportive demonstration and 
control programs 

AVAILABLE MODELS: 

* IB-902 Additional Memory 

Space (only) $ 390.00 

* IB-902-A Calendar/Clock plus 

memory space $ 690.00 

* IB-902-B A/D (12 bits, 16 channels 

plus memory space) $ 960.00 

* IB-902-AB A/D, plus memory space 

and calendar/clock $1,270.00 

Mini mother board to support up to three (3) 

interface boards $65.00 

Quantity Discounts Available 
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"RIIDD 




IS TERRIFIC 

(Fop Your Apple) 



NIBBLE IS: The Reference for Apple computing! 

NIBBLE IS: One of the Fastest Growing new Magazines in 
the Personal Computing Field. 

NIBBLE IS: Providing Comprehensive, Usefuland 
Instructive Programs for the Home, Small Business, and 
Entertainment. 

NIBBLE IS: A Reference to Graphics, Games. Systems 
Programming Tips, Product News and Reviews, Hardware 
Construction Projects, and a host of other features. 

NIBBLE IS: A magazine suitable for both the Beginner and 
the Advanced Programmer. 

Each issue of NIBBLE features significant new Programs of Commercial Quality. Here's 
what some of our Readers say: 




- "Certainly the best magazine on the Apple 11" 

- "Programs remarkably easy to enter" 

- "Stimulating and Informative; So much so that this is the first computer magazine I've 

subscribed to!" 

- "Impressed with the quality and content." 

- "NIBBLE IS TERRIFIC!" 



In coming issues, look for: 

□ Stocks and Commodities Charting □ Assembly Language Programming Column 

□ Pascal Programming Column D Data Base Programs for Home and Business 

□ Personal Investment Analysis □ Electronic Secretary for Time Management 

□ The GIZMO BusinessSimulation Game 

And many many more! 

NIBBLE is focused completely 
on the Apple Computer systems. 



Buy NIBBLE through your local 
Apple Dealer or subscribe now with 
the coupon below. 

Try a NIBBLE! 



NOTE 

hirsi Clav. or Air Mail in icqtmcj IM 
wnh Ihe lollowin£ id i" " "- ' jniounls 
Europe (32.00 

Mexico and Centra* America $21.00 
South America $32.00 
- Middle Eait $35.00 
All' payment* mint be in US funds dra 



Aft). I-I'O and all toman wldfe<AVs 
Alrica: North $32 00 
Central $43.00 
South $43.00 
Far-East. Australia $43 00 
Canada $18.00 
U.S bank 



nibble 

Box 125. Lincoln. MA 01773 (617(259-9710 

I'll try nibble! 

Enclosed is my $17.50 (for one year). 
(Outside U.S., see special rates on this page.) 

j check I- 1 money order 

Your subscription will begin with the next issue published after 
receipt ol your check/money order. 



Name 



i;WWlh> MICRO SPARC .INC , Imc-n. Mats "l" 1 All rights recced 
■ Apple II is * registered trademark Ol Apple Computer CtMlpW) 
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Speed 
Power 
Efficiency 



for 



OSI 

65 D3 SYSTEMS 



FBASIC: BASIC Compiler $155/$10 

• FAST efficient machine code written 
with the ease of BASIC. 

• SPEED-optimized, native-code compiler. 

• INTEGER subset of OSI-supplied BASIC. 

• DISK based: No problem with size of 
source or object files. 

• EXTENSIONS to BASIC: 

- Simple interface to system hardware 
and software. 

- Direct access to 6502 registers. 

- Array initialization. 

- Optional absolute array locations. 

- WHILE and other structures. 

- Simple technique for combining 
compiler and interpreter advantages. 

• FULL system: utilities (plus source), 
manual, and many useful examples. 



R-EDIT: Edit any program 
or text with ease! 



$40 



FULL CURSOR control. Edit anywhere on 

the screen. 

INSERT, replace, add, delete. 

ONE KEY stroke and you're editing. 

BASIC, assembler, etc. can all be 

edited without reloading editor. 

RAM-resident: Always ready! 

SYSGEN relocates R-EDIT and customizes. 



SPUL-65: Printer Spooler $95/$10 
Virtual Indirect File 

• STOP WAITING for your printer! 

• PROCESS words, write programs... all 
while printing! 

• QUEUE lets you pile on print jobs. 

• MULTIPLE COPIES printed with top and 
bottom page margins. 

• SYSGEN relocates SPUL65 and gives 
extensive customization. 

• INDIRECT FILE commands produce disk 
files giving you: 

- A virtually unlimited temporary file. 

- A link between incompatible files; 
for example, use WP-2 for extensive 
BASIC editing. 

- Ability to merge multiple program 
segments. 



XREF: BASIC Cross Referencer $25 

• TABULATES: 

- Referenced line numbers. 

- Variable names (numeric, string, 
array). 

- Defined functions. 

• FAST machine language program. 

• DISK based: Handles large BASIC source 
files on any drive. 




'wore 



CP/M to OSI Disk Translation 

Frustrated by all those good CP/M disks 
that won't run on your OSI CP/M system? 
It's that special OSI disk format! And 
we can fix that. Just send us your disk, 
$15, and you'll soon have an OSI compat- 
ible disk. 



Data Resource Corporation 

Suite 204 

1040 Lunaai Street 

Kailua. HI 96734 (808)261-2012 



Manual orders applied to software 
purchases. Programs supplied on 8-in, 
single-density, single-sided disks- 
Hawaii residents add 4% tax. 



Recursive Use of GOSUB 
in Microsoft BASIC 



The concept of recursion, or 
repeatedly calling a routine from 
within Itself, can make the 
coding of an algorithm much 
more efficient and elegant. Here, 
the use of recursion Is explored 
within a microsoft BASIC 
environment. The OSI 
implementation discussed here 
is portable to Apple, PET, 
TRS-80 Color, and other 
microsoft BASIC computers. 



Rolf B. Johannesen 
13917 Congress Drive 
Rockville, Maryland 20853 



A subroutine is a group of statements 
which may be called repeatedly by a 
main program or by another subroutine. 
If it is called only once it should not be a 
subroutine, but rather, coded in line. A 
subroutine may have no arguments (e.g. 
a subroutine to generate carriage return 
— line feed), or may have one or more 
arguments which are changed with each 
call (e.g. SIN (x)). 

For the subroutine to return to the 
calling program after it has finished, it 
must be given a return address by the 
calling program. This return address 
must be saved until it is needed. The 
mechanism of doing this is provided in 
the particular machine used, down to 
the hardware level, and is of concern to 
the programmer only under the follow- 
ing condition: if the return address is 
stored in a fixed location, a second call 
to the subroutine (before it has finished 
its task) will cause the return address to 
be overwritten and an eventual return to 
the original calling program will become 
impossible — disaster! However, if the 
return address is stored on a stack, then 
subsequent calls to the subroutine will 
cause the return addresses to be stored 



in successive locations on the stack and 
an orderly return back to the first level is 
possible. 

Successive Calls: Recursion 

Two questions present themselves 
immediately: why would you want to 
call a subroutine again before it has 
finished its task? And, if convinced that 
this was desirable, how can it be done? 

To answer these questions in reverse 
order, a subroutine may call itself in cer- 
tain circumstances. A skeleton example 
will illustrate this point: 

10 gel data, set up parameters 

20 GOSUB 100 

30 output results 

40 either STOP, or GO to 10 
100 If (condition) THEN (state- 
ment): RETURN 
110 GOSUB 100 
120 process results 
130 RETURN 

This skeleton can readily be 
developed into a workable program in 
such languages as ALGOL, Pascal, and, 
of particular interest here, Microsoft 
(OSI, Apple, PET, SYM, TRS-80 Color) 
BASIC. The ability of a subroutine to 
call itself is called recursion and is 
allowed in the languages mentioned 
above. Recursive calls, as in line 110 
above, are explicitly disallowed in all 
versions of FORTRAN that I know of. 

Example Programs Using Recursion 

Probably the classic example of a 
recursive subroutine is that for 
calculating N factorial. To refresh your 
memory, N factorial, written N!, is 
defined for positive integers as N (N-l) 
(N-2) ... 1. 0! = 1. When N < 0, or N 
non-integral, then N! is undefined. 
Listing 1 illustrates the use of recursion 
for calculating N!. The subroutine 
begins on line 100. You can see that this 
example meets all the conditions given 



in the skeleton listing above. By running 
this program with various values of N as 
input, you'll see that an OM (out of 
memory) error occurs on the OSI when 
N = 25. Yet, PRINT FRE (x) gives a 
large positive number. The conclusion 
to be drawn from this is that stack 
overflow occurs after 24 recursive calls, 
even though there is really plenty of 
unused memory. 



The program in listing 1 is, admit- 
tedly, a poor way to calculate factorials 
when a FOR-NEXT loop would be much 
easier. It is included solely to illustrate 
the use of a recursive subroutine in a way 
that is simple to trace through. Listing 2 
gives a program which generates all pos- 
sible permutations of a set of characters 
that are read in. (This listing illustrates 
the genesis of this article. I wanted to 
generate all possible anagrams from a 
given set of letters — the resulting pro- 
gram is given in listing 2.) In this case, 
recursion represents an easy way to 
generate the required permutations for 
any size array. If the size of the array is 
exactly three, all permutations are 
generated and printed in subroutine 590 
without recursion. If the size of the ar- 
ray is four, then four calls to subroutine 
590 are generated. For instance, if the 
original array is ABCD, the four sets of 
results are A(BCD), B(ACD), C(ABD) 
and D(ABC) where (ABC) represents all 
six possible permutations of A, B, and 
C. If the array size is larger than four, 
the subroutine works similarly. That is, 
in each step the size of the array is 
reduced by one and the subroutine is 
called again recursively. Figure 1 gives 
the results of a permutation of four 
characters. In the first example, all four 
are distinct, while in the second case 
there is one set of duplicate letters and 
the number of permutations is therefore 
cut in half. 

The principle that is illustrated in 
each of these listings is generally valid: 
the recursive subroutine examines some 
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variable. If it is small enough (N = 1 in 
listing 1, or N - 3 in listing 2), then the 
solution is calculated at once. If the 
variable examined is too large to allow 
immediate solution, then it is reduced 
by one and the subroutine calls itself 
recursively. Upon return, the variable is 
incremented again and any necessary 
calculations are done on the returned 
values. 

Listing 2 illustrates the use of a soft- 
ware stack in lines 380-400 and 480-510. 
It is necessary to generate the equivalent 
of a FOR... NEXT loop in cases where N 
> 3. However, a simple loop cannot be 
used or the loop variable would be writ- 
ten over when the subroutine was called 
recursively. Hence, we assign a variable 
stack pointer SP and use arrays NN and 
NS to hold the loop counters and the 
final values they are tested against 
respectively. If you follow the code 
you'll see that if N = 3, SP, NN and NS 
are never used. If N = 4, SP = 1, and in 
general SP = N - 3 where N is the 
original number of characters read in. 
To produce all possible permutations of 
seven characters requires about 13V4 
minutes on my OSI C1P machine. I 
have entered an array of eight characters 
and the results appear to start out cor- 
rectly, although I have not waited for 
the run to finish. 



The conversion from ASCII in line 
80 should not be required. However, the 
initial version of this program used A$ 
as a character array exactly as A is used 
in listing 2. Unfortunately, the program 
would only run for a few cycles before 
breaking down and filling my original 
array with repetitions of the same 
character. This behavior is probably 
related to the well-known string array 
bug in this machine. In any case, the 
present version appears to be bug-free for 
strings up to at least eight characters in 
length. 



Rolf B. Johannesen has worked as a 
chemist at the National Bureau of 
Standards in Washington, D.C. and 
Gaithersburg, Maryland since 1951. He was 
introduced to FORTRAN programming in 
1965, and has since programmed in many 
languages, both high-level and assembly. 
He has a KIM-1 and an OSI CI P with 8K 
BASIC in ROM plus 8K RAM. 

Editor's note: This article is not affiliated 
with Mr. Johannesen 's place of employment. 



Listing 1 

10 INPUT "ENTER N"iN 

20 IF N<0 OR INKNXN THEN 60 

30 G0SUB 100 

40 PRINT Hi "FACTORIAL =".; F 

50 GOTO 10 

60 PRINT Ni "FACTORIAL UNDEFINED" 

70 GOTO 10 

100 IF N=l OR N=0 THEN F=l: RETURN 

110 N=N-1 

120 GOSUB 100 

130 N=N+1 

140 F=F*N 

150 RETURN 



Listing 2 

10 REM PERMUTATION ROUTINE 

20 REM ILLUSTRATES RECURSIVE USE OF GOSUB 

30 REM AUTHOR - ROLF B 10HANNESEN 

40 REM LAST REVISION 20 JAN Si 

50 INPUT W* 

60 L=LEN';W*,> 

70 FOR 1=1 TO L 

80 A'. I>=fiSC<MID*CM*, 1,1}) 

■i<Z NEXT 

100 REM PERMUTE NUMERIC VALUES OF CHARACTERS 
110 REM IF STRING LENGTH1M0, A MUST BE DIMENSIONED 
120 REM '.NOTE: THERE ARE 362SS00 PERMUTATIONS OF 
130 REM TEN DIFFERENT OBJECTS!) 
140 N=L 

150 REM INITIALIZE POINTERS AND COUNTERS 
160 SF=0:PS=0:K=0 

170 GOSUB 870: REM SORT AARAV INTO ASCENDING ORDER 
180 GOSUB 270: REM FIND THE PERMUTATIONS 
190 REM IF ONE OR TWO PERMUTATIONS LEFT OVER, 
PRINT BEFORE GETTING NIXT 

200 ON PS GOTO 220,230 

210 GOTO 50: REM GET NEXT STRING 

220 PRINT TAB<2>; X*:G0T0 50 

230 PRINT TAB<2>iX*;SPC<l); V*.G0T0 50 

240 REM 

250 REM 

260 REM 

270 REM SUBROUTINE PERMUTE 

280 REM THIS SUBROUTINE DOES THE WORK 

290 REM STARTING FROM THE RIGHT, TRANSPOSE AND 

300 REM WORK TO LEFT UNTIL ALL POSSIBLE TRANSPOSITIONS 

310 REM <PERMUTATIONS) HAVE BEEN DONE 

320 IF N=3 THEN GOSUB 590 : RETURN 

330 REM PERMUTE 3 OBJECTS AND PRINT 

340 REM SORT INTO ASCENDING ORDER 

350 GOSUB 870 

360 REM IF N>3 THEN INCREMENT STACK POINTER <SP) 

370 REM COUNT DOWN ON N, AND CALL PERMUTE AGAIN 

380 SP=SP+1 

390 NS<SP>-N:REM HERE IS A F0R-NEXT LOOP 

400 NN<SP)=1:REM WITH NN AS LOOP VARIABLE 
410 N=N-1,REM AND NS AS FINAL VALUE 

420 GOSUB 2?0:REM RECURSIVE CALL WITH N DECREMENTED BV ONE 
430 REM DO NOT PERMUTE IDENTICAL OBJECTS 
440 IF A<L-N)=A<L-NN<SP)+1> THEN 340 
450 T-A<L-N> :A<L-N)-A<L-NN<SP)+1) : A<L-NN<SP)+1>-T 
460 REM SWAP ABOVE IS NEXT STEP IN PERMUTATION 
470 REM AFTER RIGHTMOST GROUP OF 3 HAS BEEN PERMUTED 
480 IF NN<SPXNS<SP>THEN NN<SP)-NN<SP>+1 :GOTO 420 
490 SP=SP-1 

500 REM BACK UP THE STACK 
510 N=N+1:REM AND COUNT UP ON N 
520 RETURN: REM REACHES HERE EVENTUALLY 
530 REM NEXT INCREMENT LOOP COUNTER IF AN IDENTICAL 
PAIR IS FOUND 

(Continued) 
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Listing 1 /Continued) 

340 IF NN<SP:KNS<SP> THEN NN<SP>«=NN<SP>*1 

:GOTO 448 
538 GOTO 490 
568 REM 
378 REM 
588 REM 

398 REM SUBROUTINE PERMUTE2 
688 REM WHEN N=3 THIS ROUTINE IS CALLED 
610 GOSUB 870: REM SORT 3 IN ASCENDING ORDER 
620 REM SET UP PRINT OF CURRENT PERMUTATION 
630 W*=CHR*<R<1J) 

648 FOR 1=2 TO L 

658 WJ=W*+CHR*<R<I>) 

660 NEXT I 

670 ON PS GOTO 780, 718 

680 REM FALLS THROUGH IF PS=8 

690 X*=W*:GOTO 720 

700 V*=UJ:GOTO 720 

718 PRINT TABC2); X*;SPC<1); V*;SPC<1); W* 

720 PS=FRE<0> :PS=— 1 

720 PS=PS+1 

748 REM CHECK IF PERMUTE IS FINISHED 

750 IF A':L-2)=>R<L-1) AND A<L-1)=>A<L) THEN 628 

760 IF A<LX=A<L-1>THEN 790 

778 T=R<L; :A<Li=A<L-l) :A<L-1)=T 

780 GOTO 630 

790 IF K=2 THEN 830 

880 IF A<L-2>=A<L-K; THEN K=K+l:GOTO 798 

310 T=fl<L-2> :R<L-2>=R<L-K> :A<L-K)=T 

820 K=K+l:GOTO 770 

830 K=@ : RETURN 

840 REM 

850 REM 

860 REM 



870 REM SORT ROUTINE 

380 REM SORTS LAST N ITEMS OF ARRAV A 

890 REM OF LENGTH L IN ASCENDING ORDER 

980 FOR IR=L-N+1 TO L-l 

910 S=ft'.IA> 

928 IB=IA 

930 FOR IC=IA+1 TO L 

940 IF A<IO=>S THEN 970 

950 S=A<IC) 

960 IB=IC 

970 NEXT IC 

930 IF IB=IR THEN 1080 

990 R<IB>=R<IR>:fl<If»>"S 

1800 NEXT IR 

1010 RETURN 



Figure 1 
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EDITRIX + GRAPHTRIX = THE MOST POWERFUL WORD PROCESSOR 
THIS SIDE OF A NEWSPAPER COMPOSITION ROOM 



EDITRIX,. 
TEXT EDITOR 

EASY TO USE 

Friendly, COMPLETE instructions that you or your 
your secretary can understand. 

• Easy to remember 1 or 2 keystroke commands. 

• Fully Menu Driven. 

POWERFUL 

• Full Cursor Control. 

• Full Print Size and Emphasis Control. 

• Underline - Superscript - Footnotes. 

• Search - Replace - Block Move. 

• Automatic Graphic Insertion and Formatting. 

• All Justify Modes and Full Margin Control 
FLEXIBLE 

• 40 or 80 Column Display. 

• Printout through GRAPHTRIX to 11 dilterent 
Printers WITHOUT CHANGING YOUR TEXT FILE! 

REQUIRES: Apple II with 48K, Applesoft in ROM, DOS 
3.3 and the GRAPHTRIX Matncs Graphics System 



GRAPHTRIX™ 
TEXT PRINTER AND GRAPHICS SCREEN DUMP 

EASY TO USE 

• Complete READABLE documentation. 

• Fully Menu Driven. 

• Self-running Introduction and Demonstration. 
POWERFUL 

• Graphic Magnification, Normal/Inverse, Page Centering. 
Hi and Low Crop Marks, Title String. 

• Automatic Formatting of Graphics in your Document. 

• Print Size, Emphasis. Underline, Superscript, Footnotes. Chapters, 
controlled from your text file. 

FLEXIBLE 

• Prints ANY HI-RES Graphic your Apple II can create. 

• Formats Text files from Applewnter OR EDITRIX. 

• Use as a Menu Driven Screen Dump OR from in YOUR OWN 
Applesoft Program. 

• Compatible with 11 different Matrix Line Printers AND 7 different 
Parallel Interface Cards. 

REQUIRES: Apple II with48K. Applesoft in ROM, DOS 3.3 and one of the 
following line printers: EPSON MX-70/MX-80/MX-100. ANADEX 
9500/9501, IDS 440G4445G/460G/560G, CENTRONICS 739. MPI 88G. 
SILENTYPE. 



FROM DATA TRANSFORMS. INC.. THE GRAPHICS LEADER 

EDITRIX and GRAPHTRIX ale " 
Apple 
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Play Copts £ Robbers 
In The Tombs Of Ancient Egypt 



Copyright 1981 By Sirius Software, Inc. 




Where your secret weapon 
is the fourth dimension... 



Copyright 1981 By Siiius Software, Inc. 



In the center of an orbiting space station 
you are protected only by a revolving 
force shield. Enemy forces are advanc- 
ing from all directions and begin to 
place killer satellites in orbit around 
your station. And then, look out for the 
meteors! 

Copyright 1981 By Sirius Software, Inc. 



A "bloody" good game for the 

true-blue game freak. Your mission in 

this exploratory operation is to deliver 

whole blood to Hemophilia, a city in 

the sky, and return to Anemia Base 

before the Gamma Goblins 

overcome you. A real heart stopper! 



Copyright 1981 By Sirius Software, Inc. 




What say *e m out ajj(J s tomP a f eW ??? 

Endless Excitement Stomping Sneakers And A Swarm Of Other Creatures 



Copyright 1981 By Stilus Software, Inc. 




Phantoms Five simulates a lighter- 
bomber mission in real time, three 
dimensional color graphics. While you 
try to make your bombing run, you have 
to avoid being hit by anti-aircraft fire 
and fight off enemy aircraft as well. 

Copyright 1980 By Sirius Software, Inc. 



Hatch some fun with the Spiders, 

Wolves, Lips, and Fuzzballs. Space 

Eggs will crack you up! Each package 

includes a multi-color T-shirt iron-on 

that says "I FRIED THE SPACE EGGS." 

Copyright 1981 By Sirius Software, Inc. 



S«V* 



$ti? 



& 









&>&& 



:<i5 



** 



ft,** 



^a* 



1^5 



*£; 



The professional graphics editing 

package lor use within the Pascal 

environment. 

Copyright 1981 By Sirius Software, Inc. 



This is the graphics editing package 
we based our business on. Includes 
the Higher Text Character Generator 
by Ron & Darrell Aldrich and over 20 
original and imaginative type styles. 

Copyright 1980 By Sirius Software, Inc. 
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THE EARTH HAS ENTERED A TIME WARP . . . AND THE BATTLE HAS JUST BEGUN 



Copyright 1981 By Sirius Software, Inc. 



A two game pack featuring "High Noon" and "Duck 
Hunt" You'll love the bad guy that tails off the roof 
and the dogs fighting over the ducks. Fun for the 
young and the young at heart. 
Copyright 1980 By Sirius Software, Inc. 





CYBER STRIKE 



AUTOBAHN 



PULSAR II 



Save yourself from the swooping aliensl This is a fast 
action arcade style game that can be played from 
ages three and up, but beware, the difficulty in- 
creases with each new wave of aliens. 
Copyright 1980 By Sirius Software, Inc. 

Interstellar challenge for the dedicated arcade gamer. 
You are in command of a light transport ship equip- 
ped with Hyperspace Drive, Antimatter Torpedoes, 
Local and Galactic Sensors, Meteor Shields, and 
an Instrument Panel which continually tabulates 
all information vital to your mission. You alone can 
prevent the clone take over of the allied settlement 
bases. WARNING . . . this game requires practice to 
play successfully .- 
Copyright 1980 By Sirius Software, Inc. 

Hair raising excitement at 120, 160, and 200 kilome- 
ters per hourl Drive through heavy traffic, oil slicks, 
narrow roads, and dark tunnels (with headlights). 
Watch out for the fire trucks! Only on the Autobahn 
can you drive this fast. 
Copyright 1981 By Sirius Software, Inc. 

A unique two game series that provides scoring 
options for separate or combination game play. To 
destroy the "Pulsar" is no easy task. It is surrounded 
by spinning shields that send out orbs of energy 
aimed directly at you. "The Wormwall" places you in 
one of the strangest mazes ever created. The walls do 
not connect. Openings only occur temporarily as 
moving colored segments in the walls cross. In addi- 
tion, there are munching mouthers in each level of 
the maze ready to gobble you up should you mis- 
judge the time and location an opening will occur. 
Copyright 1981 By Sirius Software, Inc. 



Contact Your Local Computer Dealer For More Information • Dealer Inquiries Invited 



Sirius Software, Inc. 

2011 Arden Way #2, Sacramento, California 95825 



PROGRAMMING: Copts & Robbers was programmed by Alan Merrell 
and Eric Knopp. Epoch was programmed by Larry Miller. Orbltron 
was programmed by Eric Knopp. Gamma Goblins was programmed 
by Tony and Benny Ngo. E-Z Draw was programmed by Naslr Gebelli 
and Jerry W. Jewell. Pascal Graphics Editor was programmed by 
Ernie Brock. Sneakers was programmed by Mark Turmell. Gorgon. 
Phantoms Five. Space Eggs, Both Barrels. Star Cruiser, Cyber Strike, 
Autobahn, and Pulsar II were programmed by Nasir. 

COPYRIGHT INFORMATION: All soltware mentioned in this advertise- 
ment are copyrighted products ol Sirius Soltware. Inc. All rights re- 



served. Apple and Applesoft are registered trademarks ol Apple 
Computer Inc. Higher Text is a copyrighted product ol Synergistic 
Soltware. We use Control Data disks lor highest quality. 



SYSTEM REQUIREMENTS: All soltware mentioned in this advertisement 
require an Apple II or II + with 48K with the lollowlng exceptions: E-Z 
Draw requires a 48K Apple with Applesolt in ROM (or a 64K Apple II or 
II +) Pascal Graphics Editor requires an Apple II or II + with Language 
System. 
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Short Subjects 



Add a CALL Function to 
OSI ROM BASIC 

Earl Morris 

3200 Washington St. 

Midland, Michigan 48640 

Jim Cathey 

Route 2 Box 468 

La Center, Washington 98629 



OSI BASIC-in-ROM does not have a 
command to jump directly to a ma- 
chine language subroutine. Other micros 
have a statement such as SYS XXXX or 
CALL XXXX, where XXXX is the ad- 
dress of the desired subroutine. 
Machine language routines can be ac- 
cessed through the USR function. 
However, this must first be set up with 
a POKE 1 1,X POKE 12, Y where X and Y 
are the decimal equivalents of the hex- 
adecimal address. The conversion to 
decimal and POKEing two locations 
becomes tedious when several different 
machine routines are being accessed. 



The following program will add a 
patch to ROM BASIC allowing com- 
mands of the form 

Z= USR(1)ABCD 

where ABCD is the hexadecimal ad- 
dress of your subroutine. The machine 
patch is located at $0240 below the 
start of BASIC. BASIC routines at SBC 
and $C2 are used to fetch the additional 
characters from the line of BASIC. A 
routine at $FE93, from the monitor, is 
used to convert ASCII data into a four- 
bit binary number. This routine also 
checks for invalid hex data. An invalid 
address like 

Z= USR(1)ABCQ 

will cause a return to BASIC with a 
"SN ERROR" message. The argument 
for the USR function must be present to 
avoid a syntax error, however it is not 
used here. 



Morris/Cathey Listing 












♦ 
9 


Xxx* xx xxxxxx xxxxxxxxxxxxxxxxxxxxxxxxxxx xxxxxx 






9 
* 


* CODE TO EXECUTE USR(8> ABCD WHERE * 






• 
9 


X 


'ABCD' IS HEX ADRESS OF USER SUB x 






9 

: 

• 
• 


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 






This 


code allows 3 user to execute a Machine 






: 


lanq 


jaqe subroutine bs address fron a BASIC 






• 
• 
• 


proqraM . 








9 
* 
r 


To use. the 


user Must first set up the USR 






', 


vector oh POKE 11.64 AND POKE 12.2. 






X 


Thereaf ter . 


the user nan specify the address 






•• 

• 

9 


of h 


is Ml s< 


•b after the USR call in BASIC. 


0240 




* 




$0240 




0240 


20C200 


t 


JSR 


*C2 


GET CURRENT CHARACTER 


0243 


A201 




LDX 


**01 


SET COUNTER 


0245 


D003 




BNE 


Jl 


BRANCH ALWAYS 


0247 


20BC00 


J2 


JSR 


♦ BC 


GET NEXT CHARACTER 


024A 


2093FF 


Jl 


JSR 


$FE93 


MONITOR ROUTINE ASCII TO NIBBLE 


024D 


3016 




EMI 


RET 


INVALID HEX 


024F 


0A 




ASL 


A 


SHIFT 4 BITS LEFT 


0250 


DA 




ASL 


A 




0251 


0A 




ASL 


A 




0252 


0A 




ASL 


A 




0253 


9511 




STA 


$11. X 


STORE PARTIAL ADDRESS 


0255 


20BC00 




JSR 


$BC 


GET NEXT CHARACTER 


0258 


2093FE 




JSR 


$FE93 


ASCII TO NIBBLE 


25E 


300D 




BMI 


RET 


INVALID HEX 


025D 


1.511 




ORA 


$11. X 


COMBINE WITH PREVIOUS NIBBLE 


025F 


9511 




STA 


$11, X 


STORE BOTH NIBBLES 


0261 


CA 




DEX 






0262 


10E3 




BPL 


J2 


IF X=l GO AROUND AGAIN 


0264 


20EC00 




JSR 


$BC 


GET NEXT CHARACTER 


0267 


6C1100 




JMP 


($11) 


JMP INDIRECT TO ROUTINE CALLED 


026A 


60 


RET 


RTS 




INVALID HEX - RETURN TO BASIC 



Once the patch is entered, the 
BASIC USR function must be initial- 
ized by 

POKE 11,64 : POKE 12,2 



The form of USR given above can now 
be used. Several example locations are: 

Z= USR (1)0000 

Jumps back to BASIC with "OK" 



Z= USR(1) 
Monitor 



FE00 



Z= USR(1)A4B5 
Lists BASIC program 

Z= USR(1)FF00 
C/W/M ? Message 

If you are putting BASIC into 
EPROM, the "NULL" command can 
be changed to a "CALL" command by 
changing the letters "NU" at $A0C5. 
The destination address at $A022 and 
SA023 must be changed to point to the 
routine listed here (minus one]. If this 
change is made, BASIC will accept a 
command of the form 

CALL FE00 

and jump to the routine at $FE00. 

Plotting Figures from 
Applesoft 

Harry L. Pruetz 
2929 Clydedale #376 
Dallas, Texas 75220 



High-Resolution plots on the Apple II, 
for figures whose boundaries are not 
mathematical functions, may be imple- 
mented with extensive data statements 
in Applesoft BASIC programs. Smaller 
shapes may be stored in shape tables and 
displayed using the Applesoft 'DRAW 
statement. A more practical approach is 
to use piecewise approximations to 
edges of figures and 'HPLOT' along the 
x-coordinate or y-coordinate. 

The listed Applesoft BASIC program 
plots a figure often presented as an 
example of optical illusions and is 
sometimes used in psychological tests. 
Depending on how it is presented or 
who is observing it, the figure looks like 
a vase, or two opposed human profiles. 

The coordinate definitions for Hi- 
Res points cause problems for most pro- 
grams. Ideally, a program should be 
designed using coordinate conventions 
imposed by the application, with con- 
stants and sign changes delegated to a 



No. 43 - December 1981 



MICRO - The 6502/6809 Journal 



79 



subroutine. However, if you know at 
the start of program writing that you're 
going to use Hi-Res plots, the actual 
colors to be used and location of points 
are important. For example, a smooth 
and continuous plot of a function is dif- 
ficult to achieve in any color except 
white. Even given that function limits 
are known and white is to be used, 
smooth plots are not guaranteed unless 
small step sizes are used along a coor- 
dinate. In the first three cases of the pro- 
gram, relative functions were used so 
that Hi-Res y-coordinates were used in 
the main program. The figure is sym- 
metric, therefore the mirror image of one 
side is calculated in a subroutine. 

The case loop extends from line 10 
through 230. Each case is simply a dif- 
ferent color scheme using the same 
figure. The figure was broken into four- 
teen separate pieces, PI through P14. 
Liberal use of different mathematical 
functions was made for each section, 
although simpler functions were possi- 
ble for smaller sections. 

The routine from line 300 through 
360 displays titles for each case. Lines 
400 through 490 plot solid blocks above 
and below the vase figure. 

The routine from line 500 through 
575 calculates actual x-coordinates using 
the function defined outside the routine. 
Case 2 plots an entire white and blue 
horizontal line. Note the end-point 
changes necessary to prevent black 
spaces at the end-points. 

Case 4 extends from line 235 
through 290. In this example, x-coordi- 
nate values for a circle, and spirals 
within the circle, are multiplied by 
1.0833 to give a better display on the 
CRT. Without this factor, the circle 
drawn by line 245 is obviously non- 
circular, no matter how much the 
television is adjusted. The factor 1 .0833, 
or 13/12, is not exact, but is easily 
remembered. The factor appears again in 
lines 255 and 265. The point plotted at 
line 255 and erased at line 275 serves as 
an angle indicator as the spirals get 
denser. As this case is quite time- 
consuming, the bell is sounded repeat- 
edly as soon as the plot is completed to 
alert those who have tired of watching. 
The screen is cleared when a key is 
pushed in response to the 'GET C$' at 
line 290. 

The entire program is less than 2048 
bytes long, which is comparable to the 
storage needed for the many data state- 
ments required to define the figure. 
Also, the programming was easier than a 
long list of data statements and probably 
contained fewer errors. 



REM 



••*••••••••« 



REM 

REM 

REM 

REM 

REM 

REM- 

REM 

REM 



• FIGURE PLOTTER * 

• PRUETZ * 

• » 

• LISTING 1 * 

• * 



9 PI - 3- 141 5926556 :XC - 140 

10 FOR CASE - 1 TO 3: G0SUB 300: HGR2 : G0SUB 400: HC0L0R" 3 
15 IF CASE - 1 THEN HPL0T 70,10 TO 210,10 



SIN (KB » (Y 



10:KC = 10 
- EC)) 



- 1:KB 
KB 
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- .4:KB - 71 



0:KB - 57 



20 YA = 10:YB = YA + 15:KA - 70:KB = PI / 

25 DEF FN F(Y) - KA + 6 

30 GOSUB 500: REM P1 

40 YA - YB:YB = YA + 5:KA 

45 DEF FN F(Y) - KA * Y 

50 G0SUB 500: REM P2 

60 YA - YB:YB - YA ♦ 5:KA 

65 G0SUB 500: REM P3 

70 YA - YB:YB ■= YA + 5:KA 

75 G0SUB 500: REM P4 

80 YA - YB:YB - YA + 40:KA - 57:KB 

85 DEF FN F(Y) - KA • COS (KB * 

90 G0SUB 500: REM P5 

100 YA - YB:YB - YA + 20:KA - FN F(YA):KB - 5:KC 

105 KA - KA - KB 

110 DEF FN F(Y) - KA * KB * EXP ( - KC * (Y - YA)) 

115 G0SUB 500: REM P6 

120 YA - YB:YB - YA + 5:KA - 1:KB - - 66 
125 DEF FN F(Y) - KA * Y + KB 
REM P7 

10:KA - -18KB- H3 



- PI / 160:KC 
(Y - KC) ) 



40 



1 / 10 



130 G0SUB 500: 
135 YA - YB:YB 

G0SUB 500: REM P8 



YA 



140 

145 YA - YB:YB - YA + 3:KA - 0:KB - 28 



150 GOSUB 500: REM P9 
155 IF CASE - 1 THEN HPLOT 
160 YA - YB:YB - YA * 3:KB - 
165 GOSUB 500: REM P10 



107, YB TO 112, YB: HPLOT 168, YB TO 173|YB 

33 



1:KB - - 



- 1:KB 



158 



0:KB - 33 



170 YA - YB:YB - YA + 2:KA 

175 GOSUB 500: REM P1 1 

180 YA - YB:YB - YA + 2:KA 

185 GOSUB 500: REM P12 

190 YA - YB:YB - YA + 5:KA 

195 GOSUB 500: REM P13 

200 YA - YB:YB - YA * 40:KA - 53:KB - 20:KC - PI / 40 

205 DEF FN F(Y) - KA - KB • COS (KC • (Y - YA)) 

210 GOSUB 500: REM P14 

215 IF CASE - 1 THEN HPLOT 67, YB TO 213, YB 

220 GOSUB 450 

225 FOR D - 1 TO 3600: NEXT D 

230 NEXT CASE 

235 GOSUB 300: HGR2 : HC0L0R- 3 

240 XC - 140:YC - 91 :RC - 86:RI - 90:XF - 1.0833 

245 FOR T - TO 2 * PI STEP PI / 360:X = XF * RC • 

(T): HPLOT XC + X,YC + Y: NEXT T 
250 FOR A - 1 TO 4 STEP .075: FOR V - TO (3 

» A):CV - COS (V):SV - SIN (V) 
255 HC0L0R- 3:XI - XC ♦ XF * RI * CV:YI - YC + RI 
260 P = A * V 

265 XP - XC + XF *• P * CV:YP 
270 HPLOT XP.YP 
275 HC0L0R- 0: HPLOT XI, YI 
280 NEXT V: NEXT A 
285 B$ = CHR$ (7):B$ = B$ ♦ 
290 GET C$ 

TEXT : END 

TEXT : HOME : VTAB 12 

ON CASE GOTO 310,320,330,340 

HTAB 14: PRINT "VASE OUTLINE" 

GOTO 350 

HTAB 15: PRINT "EOT* VASE": PRINT 



i 



4 



A) 



COS (T):Y ■ RC 
PI STEP PI / (8 » A 
SV: HPLOT XI, YI 



SIN 



YC 



SV 



B$ + B$: PRINT 



295 
300 
305 
310 

315 
320 
325 



HTAB 11: PRINT "(OPPOSED PROFILES)": GOTO 350 



(Continued) 
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Listing 1 (Continued) 

330 HTAB 16: PRINT "VASELINE" 

335 PRINT : HTAB 15: PRINT "(BOTTLE OF)": GOTO 350 

340 HTAB 10: PRINT "PURE PETROLEUM JELLY" 

345 PRINT : HTAB 9: PRINT "(SPIRAL OF ARCHIMEDES)" 

350 FOR D ■ 1 TO 3000: NEXT D 

360 RETURN 

400 ON CASE GOTO 435,405,425 

405 HCOLOR- 2 

410 FOR I = TO 9: HPLOT 0,Y TO 279, Y: NEXT 

415 RETURN 

425 HCOLOR- 1 

430 FOR Y = TO 9: HPLOT 67, Y TO 213, Y: NEXT 

435 RETURN 

450 ON CASE GOTO 490,455,460 

455 HCOLOR- 2: GOTO 470 

460 HC0L0R= 1 

470 FOR Y = YB * 1 TO 191 

475 HPLOT 0,Y TO 279, Y 

480 NEXT 

490 RETURN 

500 FOR Y - YA TO YB 

505 XF - FN F(Y) 

510 XL = XC - XF:XR = XC * XF 

515 ON CASE GOTO 520,525,545 

520 HPLOT XL,Y: HPLOT XR,Y: GOTO 550 

525 HPLOT O.Y TO XL.Y: HPLOT XR,Y TO 279, Y 

530 IF XL < > 2 * INT (XL / 2) THEN XL = XL ♦ 1 

535 IF XR < > 2 * INT (XR / 2) THEN XR - XR - 1 

540 HCOLOR- 2: HPLOT XL.Y TO XR,Y: HCOLOR- 3: GOTO 550 

545 HPLOT XL,Y TO XR.Y 

550 NEXT Y 

555 RETURN 



ENEMY. SHIPS HAVE SURROUNDED YOUR SPACE 
STATION. PIRINC DEADLY TORPEDOS IN AN 
ATTEMPT TO BREAK DOWN YOUR SHIELDS AND 
DESTROY THE STATION) YOU'VE GOT TO ROTATE 
YOUR LASER TURRET AND PIRE QUICKLY, 
ESPECIALLY WHEN THEY ATTACK PROM ALL POUR 
QUADRANTS AT ONCE! THEN. WITHOUT WARNING, 
AN ORBITING BOMBER SPIRALS INI CAN YOU 
ROTATE AND GET HIM BEFORE HE CRASHES INTO 
YOU? STAR ZAP I IS ANOTHER PAST ARCADE 
GAME PROM JOHN WILSON. WITH COLOR AND 
SOUND, 8K CASSETTE ONLY $9.95 

THE MARAUDERS WHO HAVE BEEN HARASSING INTERSTELLAR SHIPPING 

HAVE BEEN DETECTED USING THE STARGATE 
IN YOUR SECTOR. THE SPACE DEPENSE 
DIRECTORATE HAS ORDERED YOU TO DESTROY 
ANY SHIPS TRYING TO ESCAPE THROUGH THE 
STARGATE. USIN3 YOUR X-Y RANGING ENERGY 
CANNON. YOU MUST STOP THESE PIRATES- BUT 
WATCH OUTI ANY SHIPS WHICH SLIP THROUGH 

THROUGH THE STARGATE COUNT HEAVILY AGAINST YOU! CIS. 8K. .$9.95 

THE SECOND IN THE PRETZELLAND LINE OF EDUCATIONAL SOPTWARE. 
^_^_^ A HIDDEN WORD IS DISPLAYED BEHIND BOXES 

WP^K^B^B ^L AND * 0U MUST Th * T0 GUESS THE WORD. EACH 

a _— LETTER HAS A POINT VALUE DETERMINED BY 

O W SPINNING THE WHEEL OF FORTUNE. IF THE 

, LETTER YOU GUESS IS IN THE WORD. YOU GET 
I THE POINTS. MORE THAN JUST A FUN AND 
CHALLENGING GAME. THIS PROGRAM COMES IN 
TWO VERSIONS ON THE SAME TAPE! ONE SIDE IS A VOCABULARY BUILDER 
FOR GRADE SCHOOL STUDENTS WITH WORDS SELECTED FROM THE EDUCATOR 
APPROVED "DOLCH BASIC SIGHT VOCABULARY" . AND FOUND IN BOOKS ON 
ALL SCHOOL SUBJECTS. THE OTHER SIDE HAS STUMPERS FOR THE ADULTS 
IN THE FAMILY. WITH INSTRUCTIONS FOR ADDING YOUR OWN WORDS TOO I 



Star 
ZAP! 



STdRGdTE 
GUNNER 



Introductory 
Offer : ""res 

1/20/82 




8K CASSETTE WITH SOUND.. 18.95 

BUY 2 OR MORE OP THESE NEW SOPT- 
PRETZELS AND TAKE A $1.00 DISCOUNT 
ON EACH! 



OR, SEND $1.00 FOR ILLUSTRATED CATALOG 
AND GET A $1.50 CREDIT GOOD ON YOUR 
FIRST ORDER! 
ALL PROGRAMS AVAILABLE ON CASSETTE ONLY 

Pretzelland Software 

2005 D WHITTAKER RD. 
YPSILANTI, Ml. 48197 



Shorthand for Cursor Control 

Kerry Lourash 
1220 North Dennis 
Decatur, Illinois 62522 



From the first moment I saw Henk 
Wever's program for a BASIC command 
"shorthand" (24:25, or Best of Micro, 
Vol. 3), I wanted to incorporate it into 
my cursor control program |MICRO 
36:75). Wever's program allows C1P 
owners to print a BASIC command, 
such as GOSUB or RIGHTS, by hitting 
only two keys. 

Here's an adaptation with a small 
improvement that adds a "(" after the 
string commands. I reduced the number 
of commands from 68 to 20 (see figure 
1), since I don't see much advantage in 
typing (and remembering! ) two keys for 
one-, two-, or three-letter commands. 

Enter the shorthand routine by hit- 
ting the ESC key. The cursor will 
change from a halftone to a white 
square, indicating that a command key 
should be input. Hit the desired com- 
mand key and the command will be 
printed on the screen. If you should ac- 
cidentally hit a key that doesn't corre- 
spond to a command, the routine waits 
for another key. 



All addresses in the table should be 
filled with zeroes except for the twenty 
command addresses listed in figure 1. If 
you like, you can restore Wever's 
original table or make your own. 



Changes to the cursor control program 
are minimal. The ESC command of the 
CC is changed to "CTRL W." The 
PATCH option in the CC input routine 
is changed so that it jumps to the short- 
hand routine. 



Figure 1: Shorthand Commands 






Address 


Contents 


Command 


Key 


$0282 


(4E) 


NEXT 


N 


$0283 


(44) 


DATA 


D 


$0284 


(49) 


INPUT 


I 


$0286 


(52) 


READ 


R 


$0288 


[47) 


GOTO 


G 


$028C 


(3E) 


GOSUB 


> 


$028D 


|3C] 


RETURN 


< 


$0293 


(20) 


LOAD 


"space" 


$0294 


(53) 


SAVE 


S 


$0296 


|3A) 


POKE 


: 


$0297 


(3F) 


PRINT 


? 


$0299 


(4C) 


LIST 


L 


$029C 


[54) 


TAB) 


T 


$02A0 


(2D) 


THEN 


— 


$02BB 


(50) 


PEEK( 


P 


$02BD 


(2F| 


STR$( 


/ 


$02C0 


(43) 


CHR$[ 


C 


$02C1 


(39) 


RIGHT$( 


) 


$02C2 


(38) 


LEFT$( 


( 


$02C3 


(4D) 


MIDS| 


M 


The shift key is not used foi 


GOSUB, RETURN, RIGHT$(, 


and LEFT$(. S0280-02C3 should contain zero 


except for the 


addresses above. 
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Change the contents of these addresses: 

$1E10(12)to22 
$1E11 (1E)to02 
$1E5D(1B)to 17 



Since I'm a thrifty sort of person, I 
couldn't abide the empty space at the 
end of page two. I managed to squeeze 
another routine in the space from 
$02C4-$02FF. This program, the CC 
Lister, LISTs 23 screen lines of BASIC 
code at a time. At the end of each set of 
23 lines, you can choose to see another 23 
lines by hitting the space bar. Any other 
key returns you to the immediate mode. 



To guard against the Lister butting in 
when you save a program, the program 
checks the SAVE flag before going into 
action. Lister can also be defeated by 
typing a command before the LIST com- 
mand, such as "PRINT: LIST." The 
contents of two addresses must be 
changed in the cursor control program: 

$1EF0(A8)toC4 
$1EF1 (1F)to02 



If you already have a favorite routine 
at $0222, you could relocate these 
routines to the top of RAM and put the 
cursor control program just below them. 
The CC setup routine will keep them 
from being erased. 



********************* 



;* CC LISTER ROUTINE 


* 


.* 




* 


.* 


BY K. LOURASH 


* 


.* 




* 


. ********************* 


RTN 


EQU $1FA8 




XTT 


EQU $1FEF 





02C4 AE0502 
02C7 D01D 
02C9 A613 
02CB E099 
02CD EO06 
02CF A017 
02D1 8414 
02D3 E613 

02D5 E09A 



ORG $2C4 



LDX $205 

bne cont 

UK $13 
CPX #$99 
BNE FLAG 

ldy #$17 

STY $14 

INC $13 



;CHECK SAVE FLAG 

;IS LIST STARTING? 

;NO, CHECK LIST FLAG 
•SET LINE COUNTER 

;TURN ON LIST FLAG 



FLAG CPX #$9A ,IS LIST FLAG CM? 





***************** 






* CC 


SHORTHAND * 






* BY 

4r 


K. LOURASH * 

* 






***************** 




TABL 


EQU $280 




PATCH 


EQU $1E0F 








ORG $222 








OBJ $800 




0222 C91B 




CMP #$1B 


SHORTHAND COMMAND? 


0224 D049 




BNE RTN 


NO, RETURN 


0226 200300 




JSR $0003 


PRINT WHITE SQUARE 


0229 2000FD GET 


JSR $FD0C 


GET COMMAND KEY 


022C A243 




LDX #$43 


# OF BYTES IN TABLE-1 


022E DD8O02 LOOK 


CMP TABL.X 


LOOK FOR A MATCH 


0231 F005 




BEQ GOT 


FOUND IT? 


0233 CA 




DEX 


NEXT BYTE IN TABLE 


0234 10F8 




BPL LOOK 


TRY AGAIN 


0236 30F1 




BMI GET 


NO MATCH— GET ANOTHER KEY 


0238 AOFF GOT 


LDY #$FF 


SEARCH COMMAND TABLE 


023A 8691 




STX $91 


SAVE KEY INDEX 


023C E8 




INX 




023D CA 


31 


DEX 


NEXT COMMAND 


023E F008 




BEQ GETX 


FOUND COMMAND? 


0240 C8 


32 


INY 


NEXT CHAR. OF COMMAND 


0241 B984A0 




LDA $A084,Y 


GET CHAR. 


0244 10FA 




BPL G2 


NOT END OF COMMAND? 


0246 30F5 




BMI Gl 


END OF COMMAND 


0246 68 


GETX 


PLA 


PULL Y REG. 


0249 8592 




STA $92 


SAVE IT IN $92 


024B 68 




PIA 


PULL X REG. 


024C AA 




TAX 




024D C8 


OUT 


INY 


PRINT THE COMMAND 


024E B984A0 




LDA $A084,Y 


GET CHAR. 


0251 3005 




BMI HYBIT 


END OF COMMAND? 


0253 207202 




JSR PRIN 


PRINT CHAR. 


0256 D0F5 




BNE OUT 


BRANCH ALWAYS 


0258 297F 


HYBIT 


AND #$7F 


ZERO MSB 


025A 207202 




JSR PRIN 


PRINT LAST CHAR. 


025C A92C 




LDA #$2C 


ADD "(" ? 


025F C591 




CMP $91 




0261 1005 




BPL DONE 


NO, EXIT 


0263 A928 




LDA #$28 


PRINT "(" 


0265 207202 




JSR PRIN 




0268 8A 


DONE 


TXA 


RESTORE X AND Y REG. 


0269 48 




PHA 




026A A592 




LDA $92 




026C 48 




PHA 




026D A901 




LDA #$01 




026F 4C121E 


RTN 


JMP PATCH+3 


EXIT ROUTINE 


0272 E047 


PRIN 


CPX #$47 j 


INPUT BUFFER FULL? 


0274 B004 




BCS PO+l 


YES, PRINT BEL CHAR. 


0276 9513 




STA $13,X 


STORE IN BUFFER 


0278 E8 




INX 




0279 2CA907 


PO 


BIT $07A9 


LOAD BEL CHAR. 


027C 6C1A02 




JMP ($021A) 


PRINT CHAR. & RETURN 



i 



ii 



02D7 D0OD 






BNE CONT 


NO, TO REG. OUTPUT 


02D9 C614 






DEC $14 


EBCHMBR UAXrtER 


02DB D009 






BNE CONT 


IS COUNTER ZERO? 


02DD 2CO0FD 






JSR $FD0C 


GET CHAR. FROM KYBD. 


02EO C920 






CMP #$20 


IS IT A SPACE? 


02E2 D005 






BNE STOP 


IF NOT, STOP 


02E4 C613 


31 




DEC $13 


TURN OFF FLAG 


02E6 4CA81F 


32 


CONT 


JMP RTN 


TO REGULAR OUTPUT 


02E9 4CEF1F 


33 


STOP 


JMP XIT 


TO IMMEDIATE MODE 
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Now You Have "The Choice" 

Reliability, Quality and Performance at a reasonable Price. Systems International, Inc. is pleased 
to offer an alternate to Ohio Scientific microcomputers. Our systems are 100% compatible to OSI 
OS-65D and OS-65U software to preserve your software development investment. Just load your 
present floppies and run; no conversion of software needed or required. Compare the Following 
Facts and Make "The Choice." 



Ohio Scientific, Incorporated 

Standard Features 

C2-OEM 

48K Memory, 1 MHz 

One Serial Port 

Dual 8" Single Sided Floppies 

Plug in Boards with Many Connections 

120 Volt 60, Hz Operation Only 

90-Day Warranty 

Weight 80 Pounds 

SizeW17" X H9V2" X D23'/ 2 " 



Extra Cost Items 

Second Serial Port 

Parallel Port 

2 MHz 



Systems International, Incorporated 

Standard Features 

The Choice II 

48K Memory, 2 MHz 

2 Serial Ports, 1 Parallel Port 

Dual 8" Double Sided Floppies 

Single Board Construction for Reliability 

120/240 Volt 50/60 Hz Operation 

180-Day Warranty 

Weight 40 Pounds 

Size W12'/2" x H13 1 /2" X D16" 

Shippable by UPS in Factory Carton 

Extra Cost Items 



None 



Now Compare tUe Bottom Line ancJ MaIce "TIie ChoicE 



ft 



Total Retail $4,925.00 



Total Retail $4,525.00 
240 Volt 50 Hz Operation add $50.00 



Future plans include the "Choice ///"which is 100% compatible to the OSI C2-D 8" Winchester 
System. Also Multi-user Winchester Hard Disk System that is 100% compatible with Ohio Scien- 
tific OS-65U Level 3 Software. 

RememBer — TIiere is "The Choice" to choose a Better system! 

Domestic and International Dealer and Distributor Inquiries are Invited. Discounts to 40% 
* Ohio Scientific Price List June/July 1981 



15920 Luanne Drive 

Gaithersburg, Maryland 20760 

U.S.A. 

Tel. (301) 977-0100 Twx# 710-828-9703 



Sii 



500 Chesham House 

150 Regent Street 

London W1R5.F.A England 

Tel. 01-439-6288 Tlx 261426 
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NEW LOW PRICE 

DIRECT FROM MANUFACTURER 

$120.00 




1 



16K RAM EXPANSION BOARD 
FOR THE APPLE II* $120.00 



The Andromeda I6K RAM Expansion Board 
allows your Apple to use RAM memory in place 
of the BASIC Language ROMs giving you up 
to 64K of programmable memory. Separate 
Applesoft* or Integer BASIC ROM cards are no 
longer needed- The I6K RAM Expansion Board 
works with the Microsoft Z-80 card. Visicalc. 
DOS 3-3. Pascal. Fortran. Pilot, and other 
software. A switch on the card selects either 
the RAM language or the mainboard ROMs 
when you reset your Apple. 

The Andromeda I6K RAM Expansion 
Board has a proven record for reliability with 
thousands of satisfied customers. 



Now with One Year Warranty. 

ANDROMEDA 

A INCORPORATED 

lt£. Greensboro, NC. 27410 
919 852-1482 P.O. Box 19144 

Price for Andromeda I6K RAM 
//£';' | expansion board now only S 120.00 
Please add S5 for shipping and 
handling. North Carolina residents 
add 4% sales tax. 
•DEALER INQUIRIES WELCOME 
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Applesoft Variable Lister 



The ability to dump the values of 
all variables can be Immensely 
helpful In Applesoft program 
development. The Applesoft 
Variable Lister provides this 
ability and can be used with any 
program, located anywhere in 
memory. 



Richard Albright 
Sienna Software 
25 Marion Road 
Watertown, Massachusetts 02172 



Scott Schram, in his "Applesoft Variable 
Dump" article (MICRO 36:23), pre- 
sented a machine language program for 
printing the current values of all Apple- 
soft variables in use. Such a program is 
immensely useful in developing and 
debugging Applesoft programs because it 
permits the programmer to easily dis- 
play the values of all simple variables at 
any time. Also, by providing a list of 
used variable names, it helps prevent 
the accidental duplication of names, 
which is an easy mistake to make with 
Applesoft's two-character names. 

I used Schram' s routine successfully 
on a number of Applesoft programs, but 
I also discovered a number of programs 
on which the routine did not work at all 
or did not work well. The primary prob- 
lem lies in its need to be loaded at 
$4000. This location is the start of 
Applesoft's Hi-Res page two. Therefore 
any program using Hi-Res page two can- 
not use Schram's routine. Moreover, any 
program loaded above Hi-Res page one 
(virtually a requirement for any large 
program using Hi-Res graphics) will 
probably spill over the $4000 boundary. 



I also attempted to use this routine 
on a program having nearly 100 simple 
variables and discovered how difficult it 
is to find the value of a single variable in 
an unsorted list of that length. The in- 
ability to list the names of array vari- 
ables was also troublesome at times. 



After trying to modify Schram's 
routine, I decided that a different ap- 
proach was needed. My approach in- 
volves three routines — an Applesoft 
subroutine and two machine language 
routines. I will refer to these three 
routines collectively as the "Applesoft 
Variable Lister" (or simply "Lister"). 

Installing the Listei 

The Applesoft Variable Lister may be 
attached to any Applesoft program by 
simply merging its Applesoft subroutine 
with the main program. This can be 
accomplished using the standard Apple 
RENUMBER program or the like. Any 
unused space in which the 71 lines will 
fit without affecting the normal opera- 
tion of the program will do, but the end 
of the program is the recommended 
location. 

Once installed within the program, 
the Lister can be invoked like any 
Applesoft subroutine; that is, by means 
of a GOSUB n statement where n is the 
number of the first line of the sub- 
routine within the program. This GO- 
SUB can be issued by the main program 
or from the keyboard. 

The Lister will operate under both 
ROM and RAM Applesoft, but requires 
the use of a disk drive. The disk drive 
last accessed before the Lister was in- 
voked must contain a diskette on which 
the Lister's two machine language 
routines are stored under the names 
SHELL-METZNER SORT and APPLE- 
SOFT VARIABLE LISTER OBJ. In addi- 
tion, one file buffer must be available. 



Using the Listei 

The output from the Lister will ap- 
pear on both a printer and the screen if 
the printer is open at the time the Lister 
is invoked. Otherwise, the output goes 
to the screen only. The output format 
for the printer is slightly different from 
the screen format. 

Figure 1 is an example of the printed 
output format. User responses to prompts 
have been underlined. When the Lister 
is invoked, it first queries you for 

ALPHA SORT, MEMORY SORT 

OR QUIT? 

with the double-underlined letters ap- 
pearing in inverse on the screen. A 'Q' 
response at this point simply terminates 
the Lister with no further ado. An 'A' 
response results in an alphabetical 
listing of variables while an 'M' 
response will cause variables to be listed 
in the order stored. After either an 'A' or 
an 'M' response, the disk drive will ac- 
tivate briefly while a temporary file is 
created (more on this later). 

Next, the Lister asks if you would 
like to display 

VALUES OR LOCATIONS? 

A 'V response will give you the current 
value for each simple variable (as shown 
in figure 1); an 'L' response produces a 
display of locations at which the values 
are stored in memory. 

At this point the disk drive will again 
activate while the APPLESOFT VARI- 
ABLE LISTER OBJ and (if ALPHA SORT 
has been selected) the SHELL- 
METZNER SORT files are read and 
another temporary file is created. If sort- 
ing is performed, a 

SORTING VARIABLE NAMES . . . 
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MICRObits 



MICRObits 

MICRObits (formerly known as 
MICRO classified) is increasing to 
$25.00 per insertion, prepaid, begin- 
ning with the January '82 issue. How- 
ever, MICRO subscribers can advertise 
in MICRObits, one time, at the old rate 
of $10.00. (One $10.00 ad per sub- 
scriber, subsequent ads $25.00.) To 
submit an ad to MICRObits, send type- 
written copy to reach MICRO by the 
20th of the second month before the 
issue you would like the ad to appear in 
(i.e., by January 20th for the March 
issue). 40- word text limit. Late ads 
held for next issue. Send to: 




MICRObits 
P.O. Box 6502 
Chelmsford, MA 01824 






Ohio Scientific C1P, C4P COLOR 



Earthship has GREAT programs. 
C1P, C4P — Animated Lunar 
Lander, Catchword, real-time 
Scrabble, graphics designer, 
analytical plotter, single disk copier,- 
C1P — animation and shape table 
graphics, BASIC tutor, add and 
multiply tutor, information 
processing simulation and tutor. 
Send for catalog. 
Earthship 

17 Church Street #28 
Nutley, New Jersey 07110 



Spanish Hangman 

2,000 SPANISH words and sentences 

taught in a fun way on the Apple. 

Send for your school's free 30-day 

evaluation diskette, from: 
George Earl 

1302 South General McMullen 
San Antonio, TX 78237 

Business Software by ADS 

For the Apple II and Atari/ 800. Why 
pay more for a bunch of unrelated 
programs? Business Plus will handle 
invoices, statements, credit memos 
and more, much more! Just $299 
complete or $25 for demo disk 
(credited towards purchase). VISA, 
Mastercharge accepted. 

Advanced Data Systems 

7468 Maple Avenue 

St. Louis, MO 63143 

314/781-9388 

(Continued on page 90) 



Figure Is Example of Printed Output 






APPLESOFT VARIABLE LISTER 






ALPHA SORT, 


MEMORY SORT OR QUIT? A^ 




VALUES OR LOCATIONS? V_ 






SORTING VARIABLE NAMES... 










Simple Variables; Alpha 


Order 


Var 


Value 




Var 


Value 


A 







LB$ 


1 


A $ 






ML% 


3 


Bl$ 


3 LETTERS 


MQ 


99 


B2$ 







MR 


99 


BS$ 






NL% 


12 


CA$ 






NQ% 


9 


CL$ 


CLOSE 




NR 


12 


CR$ 






NR% 





D 







NS% 


10 


D $ 






O0$ 


OPEN SURVEY C 


EQ 


1 




oi$ 


OPEN SURVEY T 


ER% 


1 




02$ 


OPEN INTERVI E 


Fl$ 


TEST1 




OP$ 


OPEN SURVEY T 


FQ% 


9 




PP 





I 


96 




Q 


1 


J 







OQ 


1 


K 







R 





L 







R0$ 


READ SURVEY C 


LI 


9 




Rl$ 


READ SURVEY T 


L2 


1 




RE$ 


READ SURVEY C 


RR 


l 








RT% 


4 








SS 











T $ 










UN 


2048 








V 


5 








W2$ 


WRITE INTERVI 






XR% 


1 








zz 


1 












Array Variables,- Alpha 


Order 


Var 


Hex 


Dec 


Var 


Hex Dec 


CT 


$2DB2 


11698 






DT$ 


$33F5 


13301 






QC 


$2F99 


12185 






R $ 


$3194 


12692 







i 



message is displayed while the names 
are being sorted. Usually the sorting pro- 
cess takes only a few seconds. 

After a slight pause, the first page of 
variables will be displayed (and printed 
if the printer is on). A two-column for- 
mat is used for all combinations of 
display options. Numeric values are 
displayed to full precision, but strings 
longer than 14 characters are truncated. 
Forty variables appear on a full page. 
The message 

HIT SPACE BAR TO CONTINUE; 
'ESC TO QUIT 



appears on the screen (not on the 
printer) after each page. Pressing the 
ESC key results in the termination of 
the Lister (after some more disk activi- 
ty) . Pressing the space bar, on the other 
hand, causes the next page of simple 
variables to be displayed. If all simple 
variables have been displayed, the first 
page of array variables is produced. 
Notice that array variable values cannot 
be displayed; only the location of the 
start of each array is provided — even if 
VALUES is the selected display mode. 

Following the last array page, the 
Lister is terminated by pressing either 
the space bar or the ESC key. At this 
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point the disk drive will again briefly 
activate. If the Lister was invoked from 
the keyboard, a 

RETURN WITHOUT GOSUB 

error message will be encountered and 
can be ignored. If invoked from the main 
program, execution continues normally 
with the statement following the 
GOSUB. 

The Source Code 

The Applesoft Variable Lister con- 
sists of an Applesoft subroutine (listing 
1), a machine language setup routine 
(listing 2), and a machine language sort 
routine (listing 3). The Applesoft 
subroutine can be entered and SAVEd 
under an arbitrary name. The machine 
language routines may be entered into 



memory either directly using the mon- 
itor or indirectly using an assembler, 
then BSAVEd under the names APPLE- 
SOFT VARIABLE LISTER OB] (for the 
setup routine) and SHELL-METZNER 
SORT (for the sort routine). 

Technical Notes 

The Lister's Applesoft subroutine 
occupies about 3500 bytes of memory. 
In addition, execution of the Lister re- 
quires a certain amount of free space: 
five bytes per variable if the ALPHA 
SORT option is chosen and ten bytes per 
variable if the MEMORY SORT option is 
selected. The Lister does not verify that 
this space is available. If insufficient 
space exists, the result is unpredictable. 

If the addition of the Lister to a pro- 
gram using Hi-Res graphics causes the 



program to overflow into the Hi-Res 
memory area, then the merged program 
should be saved and reloaded above the 
Hi-Res memory. If only Hi-Res page one 
is used, this move is accomplished by 
executing the following POKEs between 
the SAVE and the LOAD: 

POKE 103,1 :POKE 104,64:POKE 
16384,0 

To move the program above Hi-Res page 
two, use the following POKEs: 

POKE 103,1:POKE 104,96:POKE 
24576,0 



The Lister's Applesoft subroutine 
itself uses three simple variables (ZZ, 
ZZ% and ZZ$) and one array variable 
(ZZ). These variable names should be 



Listing 1: Applesoft Variable Lister 



10 
20 
30 

40 

50 



NORMAL : PRINT 
"EMORY SORT CP 



128 THEN 60 



"LPHA SORT, 
" ; : INVERSE 



193 AND ZZ 



; : INVERSE 
PRINT "Q"; 



205 AND 



PRINT "ALUES OR 



INVERSE 



> 204 AND ZZ 



> 214 THEN 



FOR ZZ - 32 TO 35: POKE 715 + ZZ, PEEK (ZZ): NEXT ZZ 

POKE 32,0: POKE 33,40: POKE 34,0: PCKE 35,24: TEXT : NORMAL 

PRINT : INVERSE : PRINT SPC( 7 ); "APPLESOFT VAPIAELE LISTER"; SPC( 8) 

: NORMAL 
FOR ZZ - TO 9: POKE 752 + ZZ.48 + ZZ : NEXT ZZ: FOR ZZ = 10 TO 15: POKE 

752 + ZZ.55 + ZZ: NEXT ZZ 
PRINT : INVERSE : PRINT "A";: 
: PRINT "M" ; : NORMAL : PRINT 
: NORMAL J PRINT "UIT? "; 
60 ZZ - PEEK ( - 16384): IF ZZ 
70 POKE - 16368,0: PRINT CHRS (ZZ): IF ZZ < 

ZZ < > 209 THEN PRINT CHRS (7): GOTO 50 
60 IF ZZ - 209 THFN 700 

90 ZZ - ZZ - 192: IF ZZ > 1 THEN ZZ - 2 
100 PCKE 250, ZZ: INVERSE : PRINT "V";: NORMAL : 

: PRINT "L";: NORMAL : PRINT "OCATIONS? "; 
110 ZZ - PEEK ( - 16384): IF ZZ < 128 THEN 110 
120 POKE - 16368,0: PRINT CHRS (ZZ): IF ZZ < 

PRINT CHRS (7): GOTO 120 
130 ZZ - ZZ - 204: IF ZZ > THEN ZZ » 2 
140 ZZ - ZZ + PEEK (250) 

150 PRINT CHR$ (4);"BSAVE PAGE 3 SAVE, A$3C0, LS100" : PRINT 
AVE PAGE SAVE,A$C0,L$40" 
PRINT CHR$ (4):"BLOAD APPLESOFT VARIABLE LISTER CBJ" : PRINT 

4) 

POKE 250,ZZ:ZZ - FRE (0): CALL 768 

PCKE 251, PEEK (111): POKE 252, PEFK (112): IF PEEK (250) = 2 OR PEEK 

(250) - 4 THEN 260 

PRINT CHR$ (4);"BSAVE PAGE SAVE2, ASCO, L?40" : PRINT CHRS 

PRINT CHR$ (4);"BL0AP SHELL-METZNER SORT": PRINT CHRS (4) 

PRINT : PRINT "SORTING VARIABLE NAMES . . . 

POKE 25,5: POKE 26,0: PCKE 27,3 

PEEK (251) + 256 * PEEK (252) + 5 
POKE 29,0: PCKE 31, INT ( ZZ / 256): 
(31):ZZ - PEEK (254): CALL 768 

POKE 28, ZZ: POKE 29,0:ZZ - PEEK (30) + 256 * PEEK (31) - 5 « ZZ : POKE 
31, INT (ZZ / 256): POKE 30, ZZ - 256 * PEEK (31): CALL 76e 
PRINT CHRS (4);"BLCAE PAGE SA VE2" : PRINT CHR$ 
CHRS (4) 

: PRINT SPC( 5), -"SIMPLE VARIABLES; 

(250) - 3 THEN PRINT "ALPHA ORDER": 

- 2 OR PEEK (250) = 4 THEN PRINT 



160 

170 
180 

190 
200 
210 
220 
230 ZZ - 

(253) 

240 



CHRS (4);"BS 



CHRS ( 



PRINT 

PEEK (254): POKE 
POKE 30, ZZ - 256 



(4) 



28, PEEK 
* PEEK 



250 



260 



270 
280 



SAVE2" : PRINT 
HOME : INVERSE 
) - 1 OR PEEK 
IF PEFK (250) 
5)i 
PRINT : NORMAL 



(4) ; "DELETE PAGE 

';: IF PEEK (250 
SPC( 6); 
"MEMORY ORDER"; SPC( 



PRINT 



256 



I IF PEEK (253) ■= THEN 
ARIABLES" : GCSUB 400: GOTO 320 
290 ZZ(0) - PEEK (253):ZZ(1) - PEFK (251) + 
(253) + PEEK (254)) 

IF PEEK (250) > 2 THFN ZZ - ZZ : POKE 25, PEEK 
(132):ZZS - ZZS: POKE 27, PEEK (131): POKE 28, 

POKE 29, PEFK (131): POKE 30, PEEK (132) 
GCSUB 450 

IF PEEK (250) > 2 THEN POKE 250, PEEK (250) - 2 
HOME : INVERSE : PRINT SPC( 6);"ARRAY VARIABLES: 

- 1 THEN PRINT "ALPHA ORDER"; SPC( 6); 
IF PEEK (250) - 2 THEN PRINT "MEMORY ORDER"; SPC 



300 



310 
320 
330 

340 



: PRINT "NO SIMPLE V 
PEEK (252) + 5 * ( PEEK 

(131): POKE 26, PEEK 
PEFK (132):ZZ% = ZZ%: 



IF PEEK (250) 
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350 

360 

370 
380 

390 

400 

410 

420 
430 
440 
450 
460 

470 
480 
490 
500 
510 

520 



THEN PRINT : PRINT "NO ARRAY VA 



DEC" : PRINT 



PRINT i NORMAL : IF PEEK (254) 
RIABLES": GOSUB 400: GOTO 370 
ZZ(0) - PEEK (254):ZZ(1) - PEEK (251) + 256 * PEEK (252) + 5 * PEEK 
(254) i GOSUB 450 
GOTO 660 
VTAB 2 i PRINT "VAR HEX DEC * VAR HEX 

* ": RETURN 

VTAB 2: PRINT "VAR VALUE * VAR VALUE": PRINT " 

* ": RETURN 

ZZ$ - "HIT" + CHRS (96) + "SPACE" + CHR$ (96) + "BAR" + CHRS (96) + 
96) + "CONTINUE" + CHP$ (1?3) + CHRS (96) + CHR$ (1 
CHRS (103) + CHRS (96) + "TO" + CHRS (96) + "OUIT" 
LEN (ZZ$): POKE ZZ -t 1999, ASC ( MID? (ZZ$,ZZ,1)) - 6 



4 



"TO" + CHRS 
03) + "ESC" + 
FOR ZZ - 1 TO 
4 1 NEXT ZZ 

ZZ » PEEK ( - 16384): IF ZZ < 128 THEN 420 
POKE - 16368.0: IF ZZ < > 155 THEN PRINT 
POP : POP : GOTO 660 
REM PRINT VARIABLE NAMES 
ZZ(10) « INT (( PEEK (250 
34,3 

0:ZZ(1) 

ZZ(3) + 

ZZ(2) + 

ZZ(2) - 

ZZ(6) + 



PRINT : RETURN 



& LOCATIONS 
+ 1) / 2): ON ZZ(10) GOSUB 380,390: POKE 



ZZ(3) 
ZZ(2) 
ZZ(3) 
ZZ(6) 
ZZ(6) 
ZZ(3 



530 
540 



550 



« ZZ(1) - 5 

It IF ZZ(2) > ZZ(0) THEN POKE 34,0: RETURN 

19: IF ZZ(3) > ZZ(0) THEN ZZ(3) = ZZ(0) 

1 

It IF ZZ(6) > ZZ(3) THEN ZZ(1) = ZZ(1) - 100:ZZ(3) 
+ 20: GOSUB 400: HOME : GCTC 480 
VTAE ZZ(6) - ZZ(2) + 4:ZZ(8) = ZZ(1): GOSUB 540: PRINT 
(0));"* ";: IF ZZ(6) + 20 < = ZZ(0) THEN ZZ(8) •= ZZ(1) - 100: GOSUB 
540 

PRINT :ZZ(1) = ZZ(1) - 5: GOTO 510 

PRINT CHR$ ( PEEK (ZZ(8))); CHRS ( PEEK (ZZ(8) +1)): CHRS 
ZZ(e) ■» 2));" ";: IF ZZ(10) = 2 THEN 600 
PRINT "S";:ZZ(5) - PEEK (ZZ(8) + 4):ZZ(4) 
- INT (ZZ(5) / 16): PRINT CHRS ( PEEK (752 + ZZ(7))); CHRS ( PEEK 
(752 + ZZ(5) - 16 * ZZ(7))): 

CHRS ( PEEK 



SPC( 19 - POS 



PEEK 



PEEK (ZZ(8) + 3):ZZ(7) 



(752 + ZZ(7))),- CHRS 



560 ZZ(7) = INT (ZZ(4) / 16): PRINT 

(752 + ZZ(4) - 16 * ZZ(7))); 
570 ZZS - STRS (256 * ZZ(5) + ZZ(4)) 
580 PRINT SPC( 6 - LEN (ZZS));ZZS: 
590 RETURN 
600 ZZ(9) - PEEK (ZZ(8) + 3) + 256 * 

+ 2) - 31 t IF ZZ > 1 THEN ZZ = ZZ - 3 
610 ON ZZ GCTC 620,640,650 
620 ZZ(7) = PEEK (25) + 256 * PEEK (26) - 2: POKE ZZ(7) + 2, PEFK (ZZ(9 

) + 2): POKE ZZ(7) + 3, PEEK (ZZ(9) + 3): POKE ZZ(7) + 4, PEEK (ZZ(9 

) + 4): POKE ZZ(7) + 5, PEEK (ZZ(9) + 5) 



PEFK 



PEEK (ZZ(8) + 4):ZZ = PEEK (ZZ(8) 



4 



POKE ZZ(7 

RETURN 
POKE ZZ(7 



630 POKE ZZ(7) + 6, PEEK (ZZ(9 
640 ZZ(7) = PEEK (27) + 256 * 

) + ZZ, PEEK (ZZ(9) + ZZ) : 
650 ZZ(7) = PEEK (29) + 256 * 

) + ZZ, PEEK (ZZ(9) + ZZ): NEXT ZZ: PRINT ZZ%;: 
660 IF ZZ = 209 THEN 700 
670 HOME : PRINT : PRINT CHRS (4);"BLOAD PAGE SAVE": PRINT CHRS (4); 

"DELETE PAGE SAVE": PRINT CHRS (4) 
680 PRINT CHR$ (4);"BLOAD PAGE 3 SAVE" 
690 PRINT CHRS (4); "DELETE PAGE 3 SAVE": 
700 FCR'ZZ = 32 TO 35: POKE ZZ, PEEK (715 
710 HOME : RETURN 



) + 6): PRINT ZZ;: RETURN 
PEEK (28) - 2: FOR ZZ = 2 TC 4: 
NEXT ZZ: PRINT LEFTS (ZZS, 14); 
PEEK (30) - 2: FOR ZZ = 2 TC 3: 
RETURN 



PRINT CHRS (4) 
+ ZZ) : NEXT ZZ 



avoided in the main program: if they ap- 
pear in the main program, execution of 
the Lister subroutine will reset their 
values. 

Both the SHELL-METZNER SORT 
and APPLESOFT VARIABLE LISTER 
OBJ routines use page three of memory. 
However, the contents of page three at 
the time the Lister is invoked are saved 
on diskette in a temporary file named 
PAGE 3 SAVE. The original page three is 
restored as part of the Lister termination 
processing. 

Both machine language routines 
make extensive use of page zero, but, 
again, a temporary file (PAGE SAVE) is 
used to save the initial values and they 
are restored when the Lister finishes. 
However, only part of page zero is 
restored, leaving some page zero values 



altered after running the Lister. Specifi- 
cally, locations 24 to 31 ($18 to $ IF) are 
altered. These locations are not normally 
used by an Applesoft program. 

A third temporary file (PAGE 
SAVE2) is used if ALPHA SORT is 
selected. It is used to restore page zero 
values after the sorting has been com- 
pleted. All temporary files are deleted by 
the Lister if it terminates normally. 
Both the SHELL-METZNER SORT and 
the APPLESOFT VARIABLE LISTER 
OBJ routines are fully relocatable. 

The sorting routine uses the Shell- 
Mctzner algorithm and is designed to 
sort fixed-length records so that the one 
with the lowest key value appears high- 
est in the memory. Up to 32,767 records 
occupying contiguous locations may be 
sorted with this routine, space permit- 



ting. Each record may be up to 255 bytes 
in length and must have a sort key field 
that may be as short as one byte or as 
long as the entire record. The key is 
evaluated as an unsigned binary integer 
field and the sorting is performed on that 
basis. 

The sort routine uses memory loca- 
tions 25 to 31 ($19 to $1F) as ah input 
argument list, interpreted as follows: 



25 


($19): 


record length 


26 


($1A): 


key offset (i.e., 
record characters 
preceding the key) 


27 


($1B): 


key length 


28-29 


($1C-$1D): 


number of records 


30-31 


($1E-$1F): 


pointer to 1st byte of 
1st record. 



The last two items are two-byte binary 
integers, presented in the usual low 
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Listing 2: The APPLESOFT VARIABLE LISTER OBJ Routine 






•A*************************************** 

* * 






* APPLESOFT VARIABLE LISTER OBJ * 






* 
* 




SEPTEMBER 2t 


* 

, 1931 * 

* 






* THIS 


ROUTINE CREATES AN N-BY-5 ARRAY * 






* OF APPLESOFT VARIABLE 


INFORMATION AT * 






* THE BOTTOM 


OF THE STRING STORAGE AREA.* 






* EACH 


5-BYTE 'RECORD' CONTAINS A * 






* 3-BYTE NAME AND A 2-BYTE POINTER TO * 






* ITS LOCATION IN MEMORY. * 

£ * 






***************************************** 






* 
VNAME 


EQU 


SA5 1 


CURRENT VARIABLE NAME 






VLOC 


EQU 


$A8 i 


CURRENT VARIABLE LOCATION 






VTYPE 


EQU 


SAA J 


VARIABLE TYPE(0=SIMPLE;1=ARRAY) 






NSIMPL 


EQU 


SFD j 


COUNT OF SIMPLE VARIABLES 






NARRAY 

* 


EQU 


SFE j 


COUNT OF ARRAY VARIABLES 


0300: 






ORG 


$300 




0300: 




* 








0300:A5 


69 




LDA 


$69 


INITIALIZE VARIABLE POINTER TO 


0302:85 


A8 




STA 


VLOC 


START OF SIMPLE VARIABLE 


0304:A5 


6A 




LDA 


$6A 


SPACE 


0306:85 


A9 




STA 


VLOC+1 




0308:A9 


00 




LDA 


*$00 


INITIALIZE VARIABLE COUNTERS 


030A:85 


FD 




STA 


NSIMPL 


TO ZERO 


030C:85 


re 




STA 


NARRAY 




030E:85 


AA 




STA 


VTYPE 


START WITH SIMPLE VARIABLES 


0310:A5 


AA 


TOP 


LDA 


VTYPE 


TOP OF MAIN LOOP 


0312:18 






CLC 






0313:65 


AA 




ADC 


VTYPE 


SET X TO 2 TIMES THE 


0315:AA 






TAX 




VARIABLE INDEX 


0316:A5 


A9 




LDA 


VLOC+1 


IF CURRENT VARIABLE IS NOT 


0318:D5 


6C 




CMP 


$6C,X 


•BEYOND THE END OF THE 


031A:90 


11 




BCC 


STRTVP 


STORAGE SPACE FOR THE 


031C:D0 


06 




BNE 


INCVT 


•CURRENT VARIABLE TYPE, 


031E:A5 


A8 




LDA 


VLOC 


■THEN GO ON TO VARIABLE 


0320:D5 


6B 




CMP 


$6B,X 


•PROCESSING 


0322:90 


09 




BCC 


STRTVP 




0324 :E6 


AA 


INCVT 


INC 


VTYPE 


; INCREMENT VARIABLE TYPE 


0326:A4 


AA 




LDY 


VTYPE 




0328:C0 


02 




CPY 


l$02 




032A:D0 


E4 




BNE 


TOP 


;GO BACK TO THE TOP IF INDEX02 


032C:60 






RTS 




,-QUIT IF INDEX=2 


032D:A6 


AA 


STRTVP 


LDX 


VTYPE 


; START OF VARIABLE PROCESSING 


032F:F6 


FD 




INC 


NSIMPL, X 


INCREMENT VARIABLE COUNT 


0331:A2 


00 




LDX 


l$00 


; BLANK OUT CURRENT VARIABLE 


0333:A9 


20 




LDA 


JS20 


j NAME 


0335:95 


AS 


BLNKVN 


STA 


VNAME, X 




0337:E8 






INX 






0338:E0 


03 




CPX 


l$03 




033A:D0 


F9 




BNE 


BLNKVN 




033C:A0 


00 




LDY 


l$00 


;IF BIT 7 IS OFF, THEN 


033E:B1 


A8 




LDA 


(VLOC) ,Y 


,-SKIP INTEGER PROCESSING 


0340:C9 


7F 




CMP 


»$7F 




0342:90 


18 




BCC 


SAVE1 




0344:A2 


25 




LDX 


#$25 


; ATTACH '%' TO NAME 


0346:86 


A7 




STX 


VNAME+2 




0348:29 


7F 




AND 


l$7F 


;SAVE 1ST CHARACTER 


034A:85 


A5 




STA 


VNAME 




034C:C8 






INY 




,-STRIP BIT 7 FROM 2ND CHARACTER 


034D:B1 


A8 




LDA 


(VLOC) ,Y 


;AND SAVE IF NOT $00 


034F:29 


7F 




AND 


l$7F 




0351:C9 


00 




CMP 


l$00 




0353:F0 


1C 




BEQ 


LOWER 




0355:85 


A6 




STA 


VNAME+1 




0357:18 






CLC 




;SKIP STRING PROCESSING 


0358:90 


17 




BCC 


LOWER 




035A:90 


B4 


RELAY 


BCC 


TOP 


; RELAY RETURN TO TOP 


035C:85 


AS 


SAVE1 


STA 


VNAME 


,-SAVE 1ST CHARACTER 


035E:C8 






INY 




;GET 2ND 


035F:B1 


A8 




LDA 


(VLOC) ,Y 




0361 :C9 


7F 




CMP 


»$7F 


;IF BIT 7 IS OFF, THEN 


0363:90 


06 




BCC 


SAVE2 


;SKIP STRING PROCESSING 


0365:A2 


24 




LDX 


»$24 


; ATTACH '$' TO NAME 


0367:86 


A7 




STX 


VNAME+2 




0369:29 


7F 




AND 


l$7F 


;STRIP BIT 7 


036B:C9 


00 


SAVE2 


CMP 


l$00 


;SAVE 2ND CHARACTER IF NOT ZERO 



byte/high byte format. The sorting 
routine does not alter the values placed 
in any of these locations, nor does it 
verify their consistency. 

Although the sort routine can handle 
thousands of records, the setup routine 
can handle a maximum of 255 variables 
of any types (simple or array). If more 
than 255 simple or array variables 
exist, the operation of the Lister is 
unpredictable. 

Strings containing one or more car- 
riage return characters (ASCII 13) cause 
formatting problems on both the screen 
and the printer. If the value appears in 
the left column on the screen, then one 
variable may be omitted from the right 
column. On the printer, one or more 
blank lines may be introduced. This 
problem is exemplified in figure 1: the 
CR$ string consists of a single carriage 
return character, resulting in the unex- 
pected gap between the CR$ and D 
variables in the left column and the NR 
and NR% variables in the right column. 

Conclusion 

In spite of its minor restrictions, I 
have found the Applesoft Variable Lister 
to be a valuable programming aid. If you 
have any comments or suggestions for 
improving the Lister, I would like to 
hear from you. Write me at the address 
given at the beginning of this article. 




THE ULTIMATE 

HI-RES SCREEN PRINT PROGRAM FOR 

THE EPSON MX-80 OR MX-100 

• Totally menu-driven, leading the user 
through the selection process. 

• Single keystroke menu selection. 

• Stacking of several images for 
subsequent. UNATTENDED printing. 

• Inverse and OVERLAVED printing. 

• Picture pre-view (including inverse 
and overiayed). 

• Load images from disk automatically. 

• Centered output, user titles ... more. 

the program requires o 48K Appfe II, or Apple II plus 
with DOS 3 3. and an Epson MX-80 or an MX-100 
(equipped with the Gratirax option) ECHO mav be 
used with the following parallel interlace cards: 
i) Apple 2) Epson 3) Tymoc or 4) CCS 

Price: $49.95 

Dealer inquiries invited. 

(N j. odd 5% sales tax. Foreign add $5.00 air mail) 
Send check or money order to: 

HeadUare 

P.O. BOX 871, N. ARLINGTON, NJ 07032 

'Apple - Trademark of Apple Computer inc 
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Used Computer Exchange 

Save time, money and mistakes. List 
as Buyer/Seller — get pricing advice 
with names and phone numbers of 
those who meet your criteria on first 
call. Apples, PETs, Atari, OSI, 
printers, CRTs, etc. 600+ listed. 
Pay only for results. Call: 

(703) 471-0305 or 

(800) 336-3393 

Used Computer Exchange 

11484 Washington Plaza West 

Reston, VA 22090 



OSI Superboard/CIP Expansion 
Board 

Adds 8K 2114 RAM and 4 EPROM 
sockets (2716 or 2732). All link 
addressable anywhere in memory, all 
lines buffered, plugs into expansion 
socket. Bare PCB $39.95. Built (no 
RAM) $99.95. Payment: check or 
Mastercard. Includes airmail return. 

Northern Micro 

29 Moorcroft Park 

New Mill 

Huddersfield, England 

OSI Toolkit EPROM 

2716 EPROM. Address 9800-9FFF. 
Adds 16 BASIC functions: 
RENUMBER, HEX/DEC, 
DEC/HEX, CONVERSION, 
CONTROLLED LIST, VARIABLE 
LIST, TRACE, VIEW, SEARCH, etc. 
$39.95. Also: Assembler (3 x 2716) 
$49.95. Exmon EPROM $19.95. 
Payment: check or Mastercard. 
Includes airmail return. 

Northern Micro 

29 Moorcroft Park 

New Mill 

Huddersfield, England 

Printer Spooling for OSI 

Output directed to device #1 is 
automatically spooled to disk tracks. 
Outspool to printer at your leisure. 
Outspool features multiple copies 
and auto-paging. 514" dual floppy 
systems only. Specify RAM size and 
65D rev (3.2 or 3.3). $20. 
Peter Koski 

144-F Delaware Avenue 
Troy, New York 12180 



036D:F0 


02 




BEQ 


LOWER 




036F:85 


A6 




STA 


VNAME+1 




0371:38 




LOWER 


SEC 


1 


LOWER START OF STRING 


0372:A5 


6F 




LDA 


S6F ; 


STORAGE AREA BY 5 


0374:E9 


05 




SBC 


#505 




0376:85 


6F 




STA 


$6F 




0378:A5 


70 




LDA 


$70 




037A:E9 


00 




SBC 


IS00 




037C:85 


70 




STA 


S70 




037E:A0 


00 




LDY 


tS00 I 


MOVE VARIABLE DESCRIPTION 


0380:B9 


A5 00 


MOVE 


LDA 


VNAME,Y 


TO STRING STORAGE 


0383:91 


6F 




STA 


($6F),Y 




0385:C8 






INY 






0386:C0 


05 




CPV 


#$05 




0388:D0 


F6 




BNE 


MOVE 




038A:A5 


AA 




LDA 


VTYPE j 


IF CURRENT VARIABLE TYPE=1 


038C:C9 


01 




CMP 


l$01 


(I.E., AN ARRAY VARIABLE), 


038E:F0 


10 




BEQ 


INCPTR j 


SKIP SIMPLE VARIABLE 


0390:18 






CLC 




INCREMENT CURRENT VARIABLE 


0391:A5 


A8 




LDA 


VLOC 


LOCATION BY 7 AND GO ON 


0393:69 


07 




ADC 


l$07 


TO THE NEXT VARIABLE 


0395:85 


A8 




STA 


VLOC 




0397:A5 


A9 




LDA 


VLOC+1 




0399:69 


00 




ADC 


IS00 




039B:85 


A9 




STA 


VLOC+1 




039D:18 






CLC 






039E:90 


11 




BCC 


GETNXT 




03A0:A0 


02 


INCPTR 


LDY 


#$02 


INCREMENT CURRENT VARIABLE 


03A2:18 






CLC 




LOCATION BY THE LENGTH 


03A3:A5 


A8 




LDA 


VLOC 


OF THE CURRENT ARRAY 


03A5:71 


A8 




ADC 


(VLOC) ,Y 


AND GO ON TO THE 


0.3A7:AA 






TAX 




NEXT ARRAY VARIABLE 


03A8:A5 


A9 




LDA 


VLOC+1 




03AA:C8 






INY 






03AB:71 


A8 




ADC 


(VLOC) ,Y 




03AD:85 


A9 




STA 


VLOC+1 




03AF:86 


A8 




STX 


VLOC 




03B1:18 




GETNXT 


CLC 




;GO ON TO THE NEXT 


03B2:90 


A6 




BCC 


RELAY 


; VARIABLE 



i 



Listing 3: The SHELL-METZNER SORT Routine 






I******************** **************#*##*#**# 






• 






SHIiLL-ME'IYNER SORT * 






• 

* 
* 






3 A X 3 3 SB 


■ a ■> ** = 3 = = = • 










OCTOBER 4, 1931 * 






* 


THIS 


ROUTINE USES 


HIE SHELL-METZNER * 






* 


PORTING ALGORITHM 


TO SORT 'N' RECORDS OF * 






* 


'RL' 


BYTES 


EACH SO 


THAT FOR ANY RECORD * 






* 


ALL 


(ECOliD 


S HAVING 


LOWER KEY VAUES * 






* 


APPEAR ABOVE IT IN 


MEMORY. EACH RECORD * 






* 


MAY 


at: up 


CO 255 BYTES IN LENGTH AND THE * 






* 


SINGLE KEY 


FIELD MAY BE AS SHORT AS ONE * 






* 


BYTE 


OR AS 


LONG AS 


THE ENTIRE RECORD. * 






* 


THE 


KEY FIELD IS TREATED AS A BINARY * 






* 


INTE 


3Ert. 


ALL RECORDS MUST EXIST IN * 






* 
* 


CONTIGUOUS 


MEMORY 


LOCATIONS. * 






* 
XL 


EQU 


$19 


/RECORD LENGTH 






KEYOFF 


EQU 


$1A 


;KEY OFFSET FROM START OF RECORD 






KEYLEN 


EQU 


$1B 


jKEY LENGTH 






N 




EOU 


$1C 


;NUMBER OF RECORDS IN S1C-S1D 






ARRAY 


EOU 


$1E 


; POINTER TO ARRAY IN S1E-S1F 






KEYEND 


EQU 


$C9 


/OFFSET OF LAST KEY BYTE 






I 




EQU 


$CA 


/INDEX I IN SCA-SCB 






L 




EQU 


$CC 


; INDEX L IN $CC-$CD 






M 




EQU 


$CE 


/INDEX M IN SCE-SCF 






K 




EQU 


$D6 


/INDEX K IN $D6-$D7 






J 




EQU 


$EB 


/INDEX J IN SEB-SEC 






CNT1 


EQU 


$FA 


/TEMPORARY COUNTERS IN SFA-SFF 






CNT2 


EQU 


$FC 








CNT3 

* 


EQU 


$FE 




1)300 I 








ORG 


$300 




0300: 




* 










03001 18 








CLC 




/ESTABLISH OFFSET OF LAST 


0301 lAS 


1A 






LDA 


KEYOFF 


/KEY BYTE 


0303. GS 


IB 






ADC 


KEYLEN 




0305i85 


C9 






STA 


KEYEND 





i 



90 



MICRO - The 6502/6809 Journal 



No. 43 - December 1981 



0307:A5 


1C 




LDA 


N 


(INITIALIZE M TO N 


3309:85 


CE 




STA 


M 




030B|A5 


ID 




LDA 


N+l 




030Di85 


CF 




STA 


H+l 




030FI18 




LOOP1 


CLC 




•TOP OF MAIN LOOP 


0310:66 


cr 




ROR 


M+l 


M :- M/2 


0312:66 


CE 




ROR 


M 




0314IAS 


CE 




LDA 


M 


■STOP IF M»0 


3 1 6 : DO 


OS 




BNE 


MORE 




0318:A5 


CF 




LDA 


M+l 




031AIDO 


01 




BNE 


MORE 




031C:60 






RTS 






031D:A2 


00 


MORE 


LDX 


KS0O 


K :• N-M 


031F:33 






SEC 






0323:A5 


1C 




LDA 


N 




0322:E5 


CE 




SBC 


rt 




0324:85 


□ 6 




STA 


K 




J326:A5 


ID 




LDA 


N+l 




0328:E5 


CF 




SBC 


M+l 




032A:85 


'J 7 




STA 


K + l 




32C:A9 


Jl 




LDA 


iSOl 


J := 1 


032E:85 


EB 




STA 


J 




3 30: A3 


00 




LDA 


isoa 




0332:85 


EC 




STA 


j+i 




03 34 : AS 


ea 


LOOP2 


LDA 


j 


I :=• J 


03 36:85 


CA 




STA 


i 




0338i AS 


EC 




LDA 


j+i 




033A:85 


CB 




STA 


i + i 




033C:18 




LOOP3 


CLC 




L := I+M 


033D:A5 


CA 




LDA 


i 




033F:65 


CE 




ADC 


M 




0341:85 


CC 




STA 


L 




1)343 1 AS 


CB 




LDA 


1 + 1 




0345:65 


CF 




ADC 


M+l 




0347:05 


CD 




STA 


L+l 




034<J:A2 


JO 




LDX 


ISJJ 


SET X REGISTER TO 


U34B:A4 


19 


GETLOC 


LDY 


RL 


SET Y REGISTER TO RECORD LENGTH 


i)34D:33 






SEC 




INITIALIZE CNT2 TO 1-1 


034E:B5 


CA 




LDA 


I.X 


IF X=3 


0350 « ea 


Jl 




SBC 


HOI 


INITIALIZE CNT3 TO L-l 


0352:05 


FA 




STA 


CNT1 


IF X=2 


.1354 :<JS 


FC 




STA 


CNT2.X 


AND STORE THE SAME 


1)353 IBS 


CB 




LDA 


1+3., JC 


VALUE IN CNT1 


0350 : E'J 


JO 




SBC 


l$30 




035A:B5 


FB 




STA 


CNTl+l 




335C:95 


FD 




STA 


CNT2+1.X 




0J5E:83 




GETOFF 


DEY 




MULTIPLY BY RECORD LENGTH TO 


H3-SFi.fr) 


15 




BED. 


GETABS 


GET THE OFFSET OF THE 


0361:18 






CLC 




(I-l)TH RECORD (IF X=0) OR THE 


0352:A5 


FA 




LDA 


CNT1 


(L-l)TH RECORD (IF X=2) FROM 


0354:75 


FC 




ADC 


CNT2.X 


THE START OF THE ARRAY 


0355:95 


FC 




STA 


CNT2.X 




0368:A5 


FB 




LDA 


CNTl+l 




036A:75 


FD 




ADC 


CNT2+1.X 




036C-.95 


FD 




STA 


CNT2+1,X 




035E:90 


EB 




BCC 


GETOFF 




0370:D0 


CA 


RELAY3 


BNE 


LOOP3 


RELAY RETURNS 


0372:90 


CO 


RELAY2 


BCC 


LOOP2 




0374:D0 


99 


RELAY1 


BNE 


LOOP1 




0376:18 




GETABS 


CLC 




ADD LOCATION OF START 


0377:A5 


IE 




LDA 


ARRAY 


OF ARRAY TO GET ABSOLUTE 


0379:75 


FC 




ADC 


CNT2.X 


LOCATION OF (I-l)TH OR 


037B:95 


FC 




STA 


CNT2,X 


(L-l)TH RECORD 


037D:A5 


IF 




LDA 


ARRAY+1 




037F:75 


FD 




ADC 


CNT2+1,X 




0331:95 


FD 




STA 


CNT2+1.X 




0383:E8 






INX 




ADD 2 TO X REGISTER 


3384:E8 






INX 






O385:E0 


04 




CPX 


IS04 


GO GET (L-l)TH RECORD 


O387:D0 


C2 




BNE 


GETLOC 


IF X = 2 


0389:A4 


1A 




LDY 


KEYOFF 


SET Y REGISTER TO KEY OFFSET 


038B:B1 


FC 


COMPAR 


LDA 


(CNT2) ,Y 


COMPARE (I-l)TH AND 


038D:D1 


FE 




CMP 


(CNT3) ,Y 


(L-l)TH KEY VALUES; 


038F:90 


39 




BCC 


SWITCH 


SWITCH RECORDS IF THE 


0391:D0 


2F 




BNE 


INC J 


(L-l)TH KEY IS > THE 


0393:C8 






INY 




(I-l)TH KEY 


0394:C4 


C9 




CPY 


KEYEND 




0396:DO 


F3 




BNE 


COMPAR 




0398:F0 


28 




BEQ 


INCJ 




039A:A4 


19 


SWITCH 


LDY 


RL 




039C:88 




SW1 


DEY 






039D:B1 


FC 




LDA 


(CNT2) ,Y 




039F:AA 






TAX 






03A0:B1 


FE 




LDA 


(CNT3) ,Y 




03A2:91 


FC 




STA 


(CNT2) ,Y 




03A4:8A 






TXA 




(Continued) 
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TRS-80 Color Computer Game 

Play "Brickaway" on any 
configuration of the Color 
Computer. A high-speed arcade game 
in 6809 machine language with 
realistic sound and brilliant colors. 
Only $7.00 postpaid. Requires 
joysticks, sold on cassette. 

Britt Monk, CDP 
P.O. Box 802 
Elyria, Ohio 44036 



AIM 65 Assembler Listings 

ASMXRF reformats listings from the 
AIM ROM assembler into full-sized 
assembler listings, complete with 
cross reference, just like in the AIM 
Monitor Listing manual. It requires 
a full-sized printer or TTY. Object 
cassette and manual for $25.00 or 
send SASE for information. 

Nehalem Bay Software 

25730 Bach Drive 

Rockaway, OR 97136 



Software for VIC-20 

TYPING TUTOR, 4 programs of 
increasing difficulty — $9.95. 
FLASH-TESTER & LOADER, 2 
programs load and quiz — $7.95. 
SHARK JAWS, arade game — $8.95. 
VIC-DEFLECTION, 1 to 4 players — 
$6.95. $1.00 postage per order. CA 
add 6% tax. 

Academy Software 

P.O. Box 9403-M 

San Rafael, CA 94912 




KIM-1/OSI C1P Hardware 

General expansion board adds 
memory and ports. Construction 
manual — $10.00. Real-time clock 
manual describes hardware/software 
for interfacing through expansion 
board — $10.00. TimeStack 
operating system implements 
programmable controller using 
expansion board and real-time clock. 
Manual — $10.00. $1.00 for 
specif ications/ notes . 

Hunter Technical Services 

P.O. Box 359 

Elm Grove, WI 53122 
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SENSIBLE SOFTWARE. INC. is pleased to introduce... 

OUR 1981 COLLECTION OF SUPERIOR SOFTWARE FOR THE APPLE COMPUTER... 



APPLESOFT-PLUS STRUCTURED BASIC [APLUS] 8E5.QO 

32K+ , Disk II. ROM/RAM Applesoft. Apple n/ Apple II + 

APLUS is a 4K machine language utility that adds the following structured programming commands to Applesoft basic: 1) WHEN.. ELSE.. FIN, 2) UNTIL. 3) 
WHILE, 4) UNLESS, 5) CASE, 6) SELECT (variable), and 7) (OTHERWISE). Multi-line IF. THEN statements are also supported. APLUS allows the use of 
"named"' subroutines or "procedures". The programmer can now instruct a program to "DO CURVE-FIT" without worrying about the location of the 
subroutine. APLUS automatically indents "&LlST"ed programs to clarify the logic flow. The APLUS "&CONVERT" command replaces the above structured 
programming commands with "G0T0"'s and "G0SUB"'s to provide a standard Applesoft program as output. New programs can now be written using 
"G0T0"-less logic. 

APPLESOFT PROGRAM OPTIMIZER [AOPT] SSO.OO 

32+ . Disk II, ROM/RAM APPLESOFT, Apple ll/Apple II + 

AOPT is a 2.2K machine language utility that will substantially reduce the size of an Applesoft program without affecting the operation of the program. AOPT 
automatically: 1) Shortens variable names, 2) Removes remarks, 3) Removes unreferenced lines, 4) Appends short lines together, 5) Removes extra colons, 
and 6) Renumbers line numbers. AOPT will convert a verbose, well documenfed, development version ol a program into a memory-efficient, more secure, pro- 
duction version of the same program. This is the ORIGINAL and the BEST optimizer on the soltware market today 1 

DOS PLUS 885.00 

32+ . Disk II, DOS 3.3, Apple ll/Apple 11 + 

DOS PLUS is the software solution for living with both 13-sector (DOS 3.1. 3.2, and 3.2.1) and 16 sector (DOS 3.3) Apple diskettes, DOS PLUS adds 8 new 
commands to Apple DOS. Three of these are built-in and five are user definable. The built in commands include: 1) ".F" to "flip" between DOS 3.2 and 3.3 
(The user need not re-boot and any program that resides in memory will not be affected by the flip. The DOS version can even be changed wilhin a program!). 2) 
".S" status command informs you what DOS version is currently active, and 3) ".B" BLOAO- analysis is also provided to inform the user of the starling ad- 
dress and length of Ihe last accessed binary lile. DOS PLUS also includes a DOS COMMAND CHANGER program to allow easy customization ot Apple DOS com- 
mands to suit individual tastes. 

DISK OROANIZER II — NEW — 830.00 

48K, Disk II. Apple ll/Apple II + 

DO II is the fastest and friendliest utility available today lor organizing files on an Apple II diskette. DO II provides the following (unctions: 1) TITLING in Nor- 
mal, Inverse, Flashing, Lower case, and other characters normally not available. 2) CUSTOM REORDERING of the directory, 3) ALPHABETIZING, 4) DYNAMIC 
DISPLAY of ALL filenames on a diskette (including deleted files), 5) RENAMING tiles with the same character options as TITLING. 6) UNDELETING, 7) 
DELETING, 8) PURGING deleted tiles. 9) LOCKING (all or some), 10) UNLOCKING (all or some). 1 1) USE of DOS sectors for increased data storage, and 12) a 
SIMULATED CATALOG to show the modified directory before it is written to the diskette. DO II is completely MENU DRIVEN and attains it's speed by altering a 
RAM version ol Ihe catalog. DO II uses a very powerlul SMART KEY to automatically locate the next valid lilename lor any specified disk operation. Compatible 
with DOS 3.1, 3.2. 3.2.1, and 3.3 as well as MUSE DOS to allow manipulation ol SUPER TEXT files! (Note: Updates available lor $5.00 and original diskette.) 

PASCAL LOWER CASE — NEW — SE5.00 

48K+ , Disk II, Apple ll/Apple II + . Language System 

This is the most recent commercially available LOWER CASE MOD lor Pascal lor the Apple II. II is Ihe only currently available modification that is compatible 

with both versions of Pascal (1.0 and 1.1). The Pascal version is automatically checked prior to updating system Apple. II you have any of the hardware lower 

case adapters you can now input Ihe following characters directly from Ihe keyboard: | -» N C ":■■ _ and \ This modilication does NOT interfere 

with any of Ihe 'Control' character tunctions implemented by the Pascal environment and will undo' any alterations made by other commercially released 

modilications. 

QUICKLOADER 8E5.00 

48K + , Disk II. Apple ll/Apple II + ... (2 Disks) 

II you find yoursell doing Ihe same things over and over - OL will help you do it faster! OL is a unique disk that lets you load DOS. a language card (optionally), 
and an application program of your choice extremely rapidly. OL boots as a 13 or 16 sector diskette and is easy to set up and use. To change Ihe setup, you 
merely load your Apple RAM with the new data and use Ihe "RECONFIGURE" option ol QL. The next lime you boot your QL disk, it will quickly load your new 
setup (Language Card, DOS. Application program) into your Apple! QL can reduce Ihe time to pertorm these functions by up to 80%! Now that you've read 
this, you say "But I can already do all ol that!" OL doesn't do anything new - it |usl does it MORE CONVENIENTLY and FASTER! Try it. you'll like it! 

DISK RECOVERY ["THE SCANNER"] S30.00 

48K+, Disk II. Apple ll/Apple II + 

This program is long overdue. You need no longer be concerned with the problem of physically damaged disks. Just as "Apple Pascal" provides a "BAD 
BLOCK SCAN". DISK RECOVERY will do a complete scan of your Apple diskettes' recording surface. Damaged areas will be "marked" as used in Ihe disk 
directory so that no attempts will be made to "WRITE" to a bad sector. The VTOC will be completely redone to relied both Ihe bad sectors and actual disk 
usage. A complete report is generated advising Ihe user ol all corrections. A resulting "DISK MAP" is presented for your review. The greatest advantage of 
this program over the other versions is that it can be used on either NEWLY INITIALIZED DISKS or disks that ALREADY CONTAIN PROGRAMS as well as Ihe 
SPEED of analysis. THE SCANNER is fully compatible with both 13 and 16 sector diskettes. This is a must lor all Disk II owners! 

ALSO AVAILABLE: SENSIBLE SOFTWARE, INC. 

SUPER DISK COPY III S30.00 6619 PERHAM DRIVE / W. BLOOMFIELD, MICHIGAN 48033 

MULTI-DISK CATALOG III SE5.00 313-399-8877 

THE NEW PROTECTOR SE50.0D 

ICa» o, Wnte lo. inio.ma.,on> VISA and MASTERCARD WELCOME 

LUNAR LANDER II • S1S.OO Michigan Residents add 4% Sales Ia« 

— -_ ___ Please add SI 00 postage & dandling tor each item ordered 

MA8TER MAZE S1B.OO 
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03A5:91 


FE 


STA 


(CNT3) , V 




03A7:CO 


00 


CP¥ 


DS00 




03A9:DO 


Fl 


BNE 


SW1 




03AB:33 




SEC 




;I := I-M 


03AC:A5 


CA 


LDA 


I 




B3AB.IBS 


CE 


SBC 


M 




O3B0:85 


CA 


STA 


I 




03B2:A5 


CB 


LDA 


1+1 




03tJ4:E5 


CF 


SBC 


M+l - 




0386:85 


CB 


STA 


1 + 1 




03B8:A5 


CS 


LDA 


1 + 1 


(BRANCH ON Kl 


03BA:30 


06 


BMI 


INCJ 




03BC:D0 


B2 


BNE 


RELAY3 




03BE: AS 


CA 


LDA 


I 




3CO:D0 


AE 


BNE 


RELAY/3 




03C2:E6 


EB 


INC J INC 


J 


;J := J+l 


03C4:DJ 


02 


BNE 


INCJ 2 




03C6:E5 


EC 


INC 


J + l 




03C8:A5 


EC 


INCJ2 LDA 


J + l 


; BRANCH ON J>K 


03CA:C5 


D7 


CMP 


K+l 




O3CC:90 


A4 


BCC 


RELAY2 




33CE:A5 


EB 


LDA 


J 




J3D0:C5 


D6 


CMP 


K 




03D2:90 


9E 


BCC 


RELAV2 




03D4:18 




CLC 






03D5:F0 


9B 


BEQ 


RELAV2 




03D7:D0 


9B 


BNE 


RELAY1 





MICROblts 
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CBM/PET? SEE SKYLES ... CBM/PET? 



PET/CBM Owners 

Real world software at low cost. 
2114 RAM adapter and 4K Memory 
Expansion for "old" 8K PETs. Write 
for free catalog! 

Optimized Data Systems 

Dept. M, Box 595 

Placentia, CA 92670 



PET Arcade Software 

Astioidz and Munchman games for 
your 8K old-new ROMS. Astioidz 
are invading the galaxy. Four levels 
of play. Munchman is based on 
arcade game Pac-Man. ZIP and ZAP 
are out to get you. Fantastic 
graphics. $9.95 each cassette. 

ComputerMat 

Box 1664M 

Lake Havasu, AZ 86403 



"They laughed when I sat down 
at my PET and immediately pro- 
grammed in machine language. . . 
just as easily as writing BASIC." 

With the new Mikro, brought to you from England by Skyles 

Electric works, always searching Ihe world for new products for PET/CBM owners. A 
4K machine language assembler ROM that plugs into your main board. At just $80.00 for 
the Mikro chip, it does all the machine language work for you; all you have to do is start 
laying down the code. 

The Mikro retains all the great screen editing features of the PET. . -even all Ihe Toolkit 
commands. (If you own a Toolkit, of course.) Sil down and write your own machine 
language subroutine. The program you write is the source code you can save. And the 
machine language monitor saves the object code. The perfect machine language answer 
for most PET owners and for most applications. (Not as professional as the Skyles Macro- 
TeA...not as expensive, either.) 

A great learning experience for those new to machine language programming but who 
want to master it easily. Twelve-page manual included but we also recommend the book, 
"6502 Assembler Language Programming," by Lance A. Leventhal at $17.00 direct 
from Skyles. 

Skyles guarantees your satisfaction: if you are not absolutely happy with your new 
Mikro, return it to us within ten days for an immediate, full refund. 

Skyles Mikro Machine language assembler $80.00 

"6502 Assembler Language Programming" by Leventhal 17.00 

Shipping and Handling (USA /Canada) $2.50 (Europe/ Asia) $10.00 

California residents must add 6%/6'/i% sales tax, as required. 



Skyles Electric Works 

2.111. South Whisman Road 
Mountain View, California 94041 
(415) 965-1735 



Visa/Mastercard orders: call lollfree 
(800) 227-9998 (except California). 
California orders: please call (415) 
965-1735. 



/lAiaO "■ S31AMS 33S 6l3d/IAiaO" c/> 



PASCAL LEVEL 1 

This Pascal system allows the 
development of BRUNable programs. 
The system supports IF-THEN-ELSE, 
REPEAT-UNTIL, FOR-TO/ 
DOWNTO-DO, WHILE-DO, CASE- 
OF-ELSE, FUNCTION, 
PROCEDURE, PEEK, POKE as well 
as disk I/O via DOS (specify 3.2 or 
3.3). Price $35.00. Send SASE for 
more information. 

On-Going Ideas 

RD #1, Box 810 

Starksboro, VT 05487 



Extended SYM-BASIC 

Adds 30 commands, requires 16K, 
$85 US/$95 Can., object on 
cassette, manual, and source listing. 
SYM-FORTH 1.0: fig-FORTH for 
16K SYM-1. Editor, assembler, 
cassette interface $135 US/$155 
Can., object on cassette, manual and 
source listing. 

Saturn Software Limited 
8246 116ASt. 
Delta, B.C., V4C 5Y9 
Canada 

JUCAO 
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6502 COOKBOOK 
For the machine language 
programmer who knows it 
is time to get serious! Here 
are search and sort rou- 
tines, utilities, I/O & inter- 
rupt procedures, conver- 
sion routines, stack opera- 
tions. Contains flow charts, 
source listings, explana- 
tions. Machine codes pro- 
vided in both octal and 
hexadecimal. Tens of thou- 
sands of our programmer's 
cookbooks are in use. 



Order publication: 6502 SOFTWARE COOKBOOK 
Price in United States: just $12.95 + $1.00 s/h by mail. 

Please include remittance with order. Allow 3 - 4 weeks 
for delivery. MasterCard & VISA credit cards accepted. 
Our phone line for credit card orders is (203) 888-1946. 
Foreign price list available. Write for more information. 

□ Check here for descriptive literature & catalog. 



Name : 

Addr: 

City: State: Zip: 

MC/VISA # Bank: 




Signature: 

SCELBI Publications 

35 Old State Road, Oxford, CT 06483 



POWER TO YOUR AIM 

Treat your AIM to a quality power supply: 

1. Designed to Rockwell's specifications for the 
AIM-65 (5 volts at 2 amps, regulated; 24 volts, .5 
amps avg., 2.5 amps peak, unregulated). 

2. Overvoltage protection to protect the expen- 
sive circuits in your AIM (5 volt output). 

3. Handsome all metal case (two tone blue). 

4. Fuse (externally accessible), switch, pilot 
light, line cord, cable from power supply to AIM — 
all included. 

5. Conservative thermal design for long life. 

$64.95 plus shipping (5 lbs.) 



CA residents add 6 % sales tax. 
VISA/MC, cashier's or registered check. 
Personal check (allow 2 weeks to clear). 

CompuTech 

Box 20054 

Riverside, CA 92516 



There's no 

Dr.Jekyll 

in Apple IT 

programming 



&s 



Programming 6502 Assembly Language is no 
longer frightening or a monster problem. Because 
Randy Hyde has written the book that's easy to 
understand, easy to follow. It turns assembly 
language into the 'friendly language'. For anyone. 
For the average Apple II owner and the newest 
beginner. 

Let Mr. Hyde get you started immediately, with 
string and math operations. See how to convert 
BASIC programs so they run up to 100 times 
faster! Discover Sweet-16, the 'hidden' 16-bit 
pseudo computer inside your Apple. Enjoy using 
your Apple to the maximum by following the step- 
Is, by-step, practical examples. . .which turn you into 
£ a programmer in the blink of a chapter. 

|thanks to Mr. Hyde 

mbly^ $19.95 per easy-reading copy at computer 
*Y*GE stores everywhere, or from: 

DATAMOST 

19273 Kenya St. 

Northridge. CA 91326 

(213) 366-7160 



ASSEMBLY ~ 
LANGUAGE 



•Apple II is a trademark ol Apple Computer. Inc. 



VISA/MASTERCHARGE accepted. 
S1.00 shipping/handling charge. 
(California residents add 6% tax) 
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UersaWriter 





PLAN AH 




•1uu»*yi8123456780> 
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What is VersaWriter? 

VersaWriter is an inexpensive drawing 
tablet for the APPLE II that lets you 
trace a picture and have it appear on 
TV display. 



VersaWriter is a comprehensive 
software drawing package which lets 
you color in drawings with over 100 
different colors. 

VersaWriter is a shape compiler that 
converts anything on the screen 
automatically into a standard shape 
table. 

VersaWriter is a text writer for labeling 
pictures with text in six colors and 
five sizes. Use English or Greek, 
upper or lower case letters. 



VersaWriter is much more! Draw with 
brush, create schematic drawings, 
compute area and distance, edit pic- 
tures, save, recall and more. 

VersaWriter requires ROM APPLESOFT 

and 48K memory. 

$299 Suggested Retail 

UNIQUE OFFER 

Send us YOUR disk and $1 . We will promptly 

return the disk with a slide package of 10 

color pictures drawn with VersaWriter. 





18_ 17 v 



21^\- 



23*. 27 D 33 P 

2>- 28 ^ 

38 [> 



□ Enclosed is $1 and my disk. 
Send me the slide package. 

□ Send more information including 
VersaWriter dealers in my area. 

DEALER INQUIRIES INVITED. 



ADOBtSS 



STATE 



Send To: Versa Computing, Inc. • 887 Conestoga Circle • Newbury Park, CA 91320 • (805) 498-1956 
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Applesoft Memory Map 

Display 



i 



MEMAP is a short, exec file 
utility which creates memory 
maps of Applesoft programs 
without altering the memory 
contents. 



N.D. Greene 

Institute of Materials Science 
University of Connecticut 
Storrs, Connecticut 06268 



Considerable memory space is needed 
for many engineering and business pro- 
grams. Typically, these programs are 
long and use large data arrays with high- 
resolution graphics displays. Under these 
conditions, memory conflicts may oc- 
cur and destroy the graphics picture, the 
program, or machine language routines. 
To prevent these problems during pro- 
gram development, it is necessary to 
know the location and length of the pro- 
gram and its variables. What's needed is 
a memory map. Although Apple Com- 
puter has published several memory 
maps (1-5), they are general and do not 
apply to specific programs. Also, some 
of the information is incorrect as noted 
by Peter Cook in an excellent two-part 
article in this magazine (6, 7). 

There are several ways to map the 
Apple memory using the pointer ad- 
dresses listed in table 1. These may be 
examined by immediate execution com- 
mands from the keyboard. For example, 
the end of a program can be determined 
by entering: PRINT PEEK (175) + PEEK 
(176)* 256 followed by a carriage return. 
In a similar fashion all of the addresses 
listed in table 1 can be examined. How- 
ever, this is rather tedious. 

Another approach is to write a short 
program containing lines similar to the 
above example and append it to the end 
of the program being studied. This, of 



course, will lengthen the existing pro- 
gram and it is necessary to subtract the 
length of the appended portion to deter- 
mine the original program length. A 
variation of this is to create a machine 
language program which examines and 
prints the contents of the pointer ad- 
dresses. Machine language programs are 
"transparent;" they do not influence 
the pointer addresses. This is the 
method used by Cook (7) to develop 
memory maps. However, the machine 
language routine may overwrite the pro- 
gram in memory. If this occurs, the pro- 
gram will have to be re-entered after 
each memory examination. 

The above difficulties can be avoided 
by using commands similar to the pre- 
vious illustration via a disk exec file. If 
this file does not define variables or 
strings it can be used to examine mem- 
ory locations without altering them. 

The Program 

Running the program shown in 
listing 1 will create an exec file, 
MEMAP. Once the file is created, it is 
activated by the command: EXEC 
MEMAP. MEMAP prints the contents of 
the pointer addresses listed in table 1 
and calculates the amount of memory 

Table 1 

Applesoft Pointer Addresses* 
(Decimal) 





Low 


High 




Byte 


Byte 


HIMEM 


115 


116 


Strings (end) 


111 


112 


Arrays (end) 


109 


110 


Arrays (start 


107 


108 


LOMEM (variables- 


105 


106 


start) 






Program (end) 


175 


176 


Program (start) 


103 


104 



Listing 1 

5 REM 



MEMAP EXEC CREATE 
BY 
N.D. GREENE 
1981 



10AS = "MEMAP" :D* = CHRS < 4 KB* 

= CHRS ( 3* ) 
20 PRINT Ii$?"0PEN"iA$: PRINT D*J 

"URITE"»A$ 
30 PRINT "H0ME:VTAB 1IHTAB 10t?" 

01" APPLESOFT MEMORY MAP" 8$ 
40 PRINT "VTAB3:?"Q*"MAX MEMORY? 

"Q$" .49152" 
50 PRINT "VTAB5:?"QV HI 

MEM: "B*" .PEEK < 115)+PEEK< 116) 

*256" 
60 PRINT "VTAB6:?"Q*"STRINGS 

>»Q$" fPEEK 

< 115 >+PEEK< 116 >*256-< PEEK< 11 
1 )+PEEK< 112>*256>" 

70 PRINT "VTAB7:?"Q*" "0*" »PEEK( 

111 )+PEEK< 112>*256" 
80 PRINT "VTAB8:?"Q*"FREE MEMORY 

>"Q$" J PEEK 

< 111 )+PEEK< 112 )*256-( PEEK< 10 
9)+PEEK( 110>*256>" 

90 PRINT "VTAB9:?"Q«" "B*".PEEK< 

109>+PEEK( 110>*256" 
100 PRINT "VTAB10:?"0$"ARRAYS 

>"0*";PE 

EK( 109 )+PEEK< 110 )*256-( PEEK( 

107 )+PEEK< 108 >*256 )" 
110 PRINT "VTABli:?"Q«" "BV .PEE 

K( 107 >+PEEK( 108 >*256" 
120 PRINT "gTAB12:? u B« "VARIABLES 

>»Q$» JPE 

EK( 107 >+PEEK( 108 >*256-( PEEK< 

105 )+PEEK( 106 >*256 )" 
130 PRINT "VTAB13:?"0$" 

L0MEM:"BV »PEEK< 105 )+PEEK( 10 

6 >*256" 
140 PRINT "VTAB14:?"B$" "0*" .PEE 

K( 175 )+PEEK( 176>*256" 
150 PRINT "VTAB15:?"0«"PR0GRAM~ 

>"B$" JPE 

EK( 175)+PEEK< 176 >*256-< PEEK( 

103 )+PEEK< 104 >*256 )" . 
160 PRINT "VTAB16:?"Bi" "B«".PEE 

K< 103 )+PEEK( 104 >*256: VTAB16" 



170 PRINT B* J" CLOSE" JA$ 



* See reference 2. 
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Figure 1: MEMAP screen outputs obtained (A) before and (B) after running the following program: 10 DIM A (1000) 

20 A$ = "TRIAL" 
30 A$ = A$ + A$ 



(A) 



APPLESOFT MEMORY MAP 
MAX MEMORY: 49152 
HIMEM: 38400 

38400 

2093 

2093 



STRINGS 

FREE MEMORY- 
ARRAYS 

VARIABLES 



LOMEM: 2093 
2093 



PROGRAM- 



->0 

-5-36307 
->0 
->0 

->44 



(B) 

APPLESOFT MEMORY MAP 

MAX MEMORY: 49152 

HIMEM : 38400 

38390 

7112 

2100 



STRINGS 

FREE MEMORY- 
ARRAYS 

VARIABLES 



LOMEM : 2093 
2093 



2049 



PROGRAM- 



MO 

>31278 

>5012 

>7 

>44 



2049 



used by the program and its strings, 
arrays and variables. A few comments 
about the program listing may be 
helpful. The ASCII character code (34] 
for a quote mark is defined as a string in 
line 10 and later used to introduce 
quotes into the text file. Since exec files 
mimic keyboard input, they leave cur- 
sor marks on the screen as each com- 
mand is executed. For aesthetic reasons, 
the program prints over these marks 
with a blank (line 70 for example). The 
question mark, ?, is a shorthand nota- 



tion for the PRINT statement. It is used 
throughout this program. 

Output 

Figure 1 illustrates the screen dis- 
plays obtained when MEMAP is exec'd 
before and after running a short pro- 
gram. (Note: it is not possible to directly 
print the output because of the back- 
spacing and overprinting used. A screen 
dump routine is required to obtain a 
printed copy. This is of little conse- 



quence since permanent copies arc rarely 
needed.) Programs start at location 2049 
and progress upward. This program is 
located between 2049 and 2093 and is 
therefore 44 bytes long. Unless other- 
wise instructed, the computer sets LO- 
MEM at the end of the program and fills 
the spaces above it with the program 
variables. These are not defined until 
the program is run as shown by compar- 
ing figures 1A and IB. This program has 
a single variable, A$. Each floating point 
variable requires seven bytes of memory 



Why do unnecessary surgery 
on your Apple? 



Sooner or later, you're going to need a 16K 
memory-expansion for your Apple. When you 
do, we suggest you buy it on the card that doesn't 
require poking about on the motherboard — nor 
removing a RAM chip, installing a strap, etc. 

T'he Ramex 16 RAM Board just plugs in. It's 
simple, reliable, and does its own memory 
refresh, with no additional connections. 



Run Pascal. Fortran, FP, INT and 
.other alternate languages, 56K 
CPM with a Z80 Softcard, increase 
usable memory for Visicalc by 16K. 
The possibilities are endless. Do 
it with the finest, closed-track 
engraved, epoxy sealed, 16K 



Apple and Applesoft are registered trademarks of Apple 
Computer, Inc Pascal is a registered trademark of the Regents of 
ihe I of u, San Diego. Visicalc is a registered trademark of 
Personal Software CPM is a registered trademark of Digital 
Research, Inc Z80 is a registered trademark of Zilos, Inc. 
Softcard is a registered trademark of Microsoft 



board available — the Ramex 16. And do 
it without unnecessary surgery on your Apple. 

In spite of its quality, the Ramex 16 costs less 
than most other expansion boards — just 
$139-95. And it comes with a one year limited 
warranty, instead of the usual 90 days. 



G 




et the Ramex 16 from your local dealer, 
or order direct. Visa and Mastercard 
holders call toll-free, 1-800-835-2246. 

OAAEGA AMCROWARE,INC 

222 SO. RIVERSIDE PLAZA 

CHICAGO, IL 60606 

312-648-1944 



Look, ma, 
no straps! 



as confirmed by this map. Above the 
variable space, arrays are stored. Each 
floating point array requires seven bytes 
for indexing and five bytes for each array 
element. In this case, the total space 
needed is 7 + (1001 x 5) or 5012 bytes 
which is confirmed by figure IB. Array 
space is not reserved until the program 
is run. 

A 48K Apple has an upper memory 
capacity of 49152 bytes. The disk sys- 
tem (DOS) resets HIMEM to 38400 to 
protect its operating instructions. 
Below this point, redefined strings are 
stored; one byte for each string ele- 
ment. Line 30 in the example program 
redefines A$ as A$ + A$ which contains 
ten letters. Defined strings (e.g. line 20) 
are stored in the program area rather 
than in the so-called string region. The 
free or unused memory is located be- 
tween the upper end of the array 
memory space and the bottom of the 
string storage area, as shown. 

If several redefined strings are used 
in a program, each one is entered at 
HIMEM, pushing previously stored 
strings downward. If this is repeated, 
the new strings are added at HIMEM 
and the previous strings, pushed down- 
ward, are left as residuals or "garbage." 
This effect can be illustrated by modi- 
fying the program used in figure 3 to 
repeatedly create new strings |figure 4). 
Here two variables, A$ and I, are defin- 
ed which require 2 x 7 or 14 bytes. The 
redefinition of A$ is repeated 2000 
times, which consumes 20K of memory! 

Applications 

Memory maps are interesting by 
themselves, but their real use is to 
assist in program development. For ex- 
ample, consider the program and map 
shown in figure 2. The string 
"garbage" extends down to 18400, 
which is within the area normally used 



Figure 2: MEMAP screen output obtained after running the 

following program: 

APPLESOFT MEMORY MAP 
10 DIM A (1000) 

15 FOR I = 1 TO 2000 MAX MEH0RY: 49152 

20 A$ = "TRIAL" 

30 AS = AS + AS HIMEM : 38400 

40 NEXT STRINGS >20000 

18400 

FREE MEMORY >1 1260 

7140 

ARRAYS >5012 

2128 

VARIABLES >14 

L0MEM: 2114 
2114 

PROGRAM >65 

2049 



by high-resolution graphics, page two 
(16384 to 24575). Thus, it would not be 
possible to use HGR2 displays with 
this program without overwriting the 
graphics picture. This can be verified 
by adding a new line, 12 HGR2, and 
running the program. In a few mo- 
ments, the Hi-Res screen fills with 
meaningless hash. However, figure 2 
indicates that it should be possible to 
use page one of Hi-Res graphics, since it 
occupies the space between 8192 and 
16383. Changing line 12 to HGR and 
running the program shows no evi- 
dence of overwriting: the screen re- 
mains black and clear. 



Perhaps the most important aspect 
of using MEMAP in program develop- 
ment, is its educational value. In addi- 
tion to showing that Hi-Res page one 
may be used without conflicts, figure 2 
also suggests that redefined strings 
should be avoided or used sparingly. 
The string clearing effects of the FRE 
command can be seen by comparing 
before and after memory maps. Ex- 
amining other programs with MEMAP 
suggests other ways to save space 
and/or to avoid memory conflicts. 
These include using integer rather than 



floating point arrays, employing multi- 
statement program lines, and moving 
HIMEM and LOMEM to protect parts 
of programs. 
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EDrT 6502 



T.M. LJK 




Pass Assembler, Disassembler, and Editor Single Load Program 

DOS 3.3., 40/80 Columns, for Apple li or Apple II Plus* 




A MUST FOR THE MACHINE LANGUAGE PROGRAMMER. Edit 6502* is a two pass Assem- 
bler. Disassembler and text editor lor the Apple computer. It is a single load program 
that only occupies 7K of memory. You can move freely between assembling and disas- 
sembling. Editing is both character and line orientated, the two pass disassemblies 
create editable source files. The program is so written so as to encompass combined 
disassemblies of 6502 Code. ASCII text, hex data and Sweet 16 code. Edit 6502 makes the 
user feel he has never left the environment of basic. It encompasses a large number of 
pseudo opcodes, allows linked assemblies, software stacking (single and multiple 
page) and complete control of printer (paganation and tab setting). User is free to 
move source, object and symbol table anywhere in memory. Requirements: 48K of 
RAM, and ONE DISK DRIVE. Optional use of 80 column M&R board, or lower case availa- 
ble with Paymar Lower Case Generator 

TAKE A LOOK AT JUST SOKE OF THE EDITIMG COMMAND FEATURES. Insert at line » n Delete a character 
Insert a character Delete a line » n List line In!, nZ to line » n3 Change line » nl to n2 "stringl" Search 
line » nl to n2 "stringl" 

UK Enterprises Inc. P.O. Box 10827 SI. Louis, MO 63129 (314)84M124 

•EM 6502 T.M. ol UK EM. Inc.. - 'Apple T.M. el Apple Compuier Inc. 



LOOK AT THESE KEY BOARD FUNCTIONS: Copy lo the end ol line and 
exit Go to the beginning ot the line, abort operation delete a 
character al cursor location go to end ol line: find character 
alter cursor location: non destructive backspace insert a 
character at cursor location shift lock: shift release forward 
copy delete line number prefix special print characters Com- 
plete cursor control home and clear, right, left down up. Scroll a 
line at a time Never type a line nuntxr again. 

Ml this ind much much more — Send Ix FREE InhtriMtltn. 
Atari Cartridge $199.95 

Apple Disk (Version 2) $99.95 




Three minutes to find that "just right" property. 

Search through up to 3600 property listings with Real-Soft 
programs for Real Estate Agencies. 




SChNS '■■-:■ - z - 
iSH TO QUIT, OR JtiSSu TO PRINT 



REAL - 



SEARCH LISTINGS FILE 
EDIT LISTINGS FILE 
COMPARE MORTGAGE TERMS 
PRINT AMORTIZATION TABLE 
ESTIMATE LOAN CAPACITY. 
CALCULATE REPLACEMENT OUST 
ED I T/CONF I CURE SYSTEM 
FORMAT DATA DISKETTE 
END SESSION 



PLEASE ENTER YOUR CHOICE 
BETWEEN 1 AND 9 



No need to flip through endless pages of listings to 
find that "just right" property. Simply have your 
client specify the price range, number of bed- 
rooms, preferred geographical location, accept- 
able house styles and up to 12 additional listing 
features. REAL-SOFT programs will find the right 
properties quickly and impressively giving you 
more time to view the selected properties and 
close the sale! 



REAL-SOFT is an integrated set of computer pro- 
grams designed specifically for real estate agency 
use. All routines are fully customizable to meet the 
requirements of virtually any agencies. Up to 10 
different house styles, 12 different listing features 
and 16 different areas. Very easy to learn — in- 
cluded is a complete set of practice data to experi- 
ment with. Requires 48K Apple II, 2 disk drives and 
monitor. Printer is optional. 



If printer is used a printout of selected properties 
can be output in only a few minutes for your client 
to view and discuss in detail. 





Other useful routines in this powerful set of pro- 
grams include a Property Availability Report, full 
Mortgage Amortization Tables (American OR 
Canadian method), and a Mortgage Compari- 
son Analysis Report. Then use still another 
part of REAL-SOFT to estimate the replace- 
ment cost of any listing (using local factors), 
or to estimate the mortgage amount that 
your client can qualify for! 



Available at your local Apple dealer. 



Apple II is a trademark of Apple Inc. 



REAL- SOFT Real estate software 

1 450 West Georgia Street, Vancouver, B.C. V6G 2T8 
Telephone (604) 669-2262 




FOR YOUR FAVORITE APPLE 



"NO NONSENSE BOOKS" 

A GENERAL LEDGER SYSTEM 
FOR THE APPLE COMPUTER 

• WE'VE KEPT IT SIMPLE FOR YOU 

• EASY TO LEARN AND USE 

• SETUP AND RUN IN 10 MINUTES 

• 50 SUGGESTED ACCOUNTS 

• 5 PROFIT CENTERS 

• 2 CHECKING ACCOUNTS 

• JOURNAL AND CHECK RECORDS 

• BALANCES CHECKBOOKS 

• INSTANT PROFIT AND LOSS 
STATEMENTS 

• 1—7 MONTHLY REPORTS 

APPLESOFT— 2 DISK DRIVES, 

132 COL. PRINTER, 48K MIN. REQ $225.00 

DEMO DISK & HANDBOOK $10.00 




"DEPRECIATION" 

A LONG TERM ASSET 
MANAGEMENT PROGRAM 



2 CHECKING ACCOUNTS 
REVIEWED IN SEPT. 81 CALL A.P.P.L.E. 
7 DEPRECIATION METHODS 
RECORDS UP TO 800 ITEMS ON DISK 
UP TO $1 MILLION FOR EACH ITEM 
4 REPORTS ANYTIME 

DEPRECIATION ON SCHEDULE 

EQUIPMENT INVENTORY 

RECOVERED COST LIST 

DISPOSED EQUIPMENT LIST 
FISCAL YEAR BASED 
CONVERT METHODS ANYTIME 



APPLESOFT 32K MIN $225.00 

DEMO DISK & HANDBOOK $10.00 



MONEY DISK 

P.O. BOX 1531 • RICHLAND, WA 99352 • 509-943-0198 
COMPUTER PROGRAMS FOR BUSINESS 



WA Residents, add 5.3% sales tax 



APPLE IS A REGISTERED TRADEMARK 
OF APPLE COMPUTER INC. 




LOGICAL SOFTWARE, INC. 

PROUDLY PRESENTS: 

MAIL EXPRESS 

A MAIL LIST PROGRAM FOR THE APPLE II. 

An easy lo use. powerful mailing list utility that can be used by com- 
panies or individuals to store the Name, Address, Telephone number of 
clients or friends. 

MAIL EXPRESS provides User Definable Codes for City. State and Zip 
These Codes shorten the time required by you to type in names to your 
mailing list and save room on the disk! 

— Store up to 2,200 names per disk 

— Sort a file in 30 seconds 

— Prints Return Addresses 

— Machine Language Find Routine will search for any Informa- 
tion included in the file in seconds. 

This is an easy to use professional quality mail list able to handle large 

orsmautites. Price $49.95 

$2.00 Postage & Handling 



Logical Software, Inc. 
P.O. Box 354 
Farmington, Ml 48024 
(313) 474-8774 




®Apple and Apple II are registered 
trademarks ot Apple Computer Inc. 



OME6ASOFT 6809 PASCAL MEANS PRODUCTIVITY 



How available lor most 6809 operating systems Is a compact single- 
pass compiler that quickly translates Pascal into optimized assembly 
language code. OmegaSoft Pascal is on Ideal way to increase your 
programmers' productivity In oil phases ol program generation and 
maintenance. 

The accepted syntax is based on the proposed ISO standard with extensions 
designed to interlace to the real world. Byte wide variables can be 
manipulated to easily access I/O devices and complete support is provided 
allowing user defined interfaces to be used with the standard Pascal 
procedures. Dynamic length strings, long integers, and random disk files 
facilitate development of sophisticated applications programs for 
industry and business. 

An interactive symbolic debugger Is included to allow you to quickly 
execute your program. The debugger allows selling breakpoints at the 
start of Pascal statements, examining and changing variables, and to trace 
through one statement at a time. Utilities are provided to interactively 
create the control files used to automatically compile, assemble, and 
link the Pascal program to produce a totally position independent, 
reentrant, and romable object module. 

OmegaSoft currently supports five of the most popular 6809 operating 
systems and OEM licenses can be arranged. Single unit domestic 
list price ("81) for the compiler package is $425 with quantity and 

dealer discounts available. For a data sheet and ordering information 

write or call 1 



OmegaSoft 

P.O. Box 70265 

Sunnyvale , C A 94086 

1 (408) 733-6979 




t 



I 



100 



MICRO - The 6502/6809 Journal 



No. 43 - December 1981 



Applesoft 
Line Finder Routine 



This 55-byte machine language 
program will display the bytes 
constituting a specified line In 
an Applesoft program. This 
program also demonstrates how 
you can use the subroutines 
available in Applesoft and the 
Apple Monitor. 



Peter J. G. Meyer 

55 Sutter St., Suite 608 

San Francisco, California 94104 



The Applesoft Interpreter |at $D000- 
$F7FF) and the Apple Monitor ($F800- 
SFFFF) contain many useful machine 
language subroutines which may be 
utilized by programmers. Most of these 
subroutines are documented briefly in 
John Crossley's article "Applesoft In- 
ternal Entry Points" in the first issue of 
The Apple Orchard. 

One such subroutine is named 
FNDLIN (at $D61A), and its task is to 
find the location, in memory, of a given 
line of an Applesoft program. To see 
why one might wish to do this, con- 
sider the following simple problem: 
how do you print "APPLE )[ PLUS" 
from within a program? This is easily 
reduced to two simpler problems: how 
to print "]" and "["? The former is 
available on the Apple keyboard in the 
guise of shift-M, but the latter is not 
enterable from the keyboard. A solu- 
tion is to include in your Applesoft pro- 
gram the line PRINT "APPLE ]Z 
PLUS", and then replace the hex- 
adecimal number which represents 'Z' 
(namely, $5A) with the number which 
represents '[' (namely, $5B). This re- 
quires examination of the region of 
memory containing the tokenized form 



Listing 1 










****************** 

* * 






* LINE FINDER * 

* * 






* BY 


PETER MEYER * 

* 






****************** 






APPLESOFT SUBROUTINES 




FNDLIN ECU SD61A 




ADDON 


ECU SD998 




REMN 


ECU SD9A6 




LINGET ECU $DA0C 




CHKCCM ECU SDEBE 






MONITOR SUBROUTINES 




XAK 


ECU SFEB3 




BELL 


ECU $FF3A 




MCNZ 


ECU $FF69 






ZEKC 


PAGE LOCATIONS 




1 


u 


EPZ $3C 




1 


\2 


EPZ $3E 




1 


JNNUV 


EPZ $50 




1 


jCWTP 


EPZ $9B 




1 


WITTF 


EPZ ?B8 








ORG S300 
CBJ $800 


.-RELOCATABLE 


0300 20BEEE 




JSR CHKCCM 


;CHECK FOR COMMA 


0303 20CCEA 




JSR LINGET 


,-GET LINE NUMBER 


0306 201AD6 




JSR FNDLIN 


;SEARCH FOR LINE IN BASIC PROGRAM 


0309 BCC3 




BCS FOUND 




C30B 4C3AFF 




JMP BELL 


;NCT FOUND 


C30E A59B 1 


'CUND 


LDA LCWTR 


;STORE STARTING ADDRESSS AT Al 


0310 A49C 




LEY LCWTR+1 




0312 853C 




STA Al 




0314 843D 




STY Al+1 




0316 A59B 




LDA LCWIR 


;SET TXTPTR TO STARTING 


C318 18 




CLC 


; ADDRESS + 4 


0315 6904 




AEC #$04 




031B 85B8 




STA TXTPTR 




C31D A59C 




LDA LCWTR+1 




C31F 6900 




ADC #$00 




C321 85B9 




STA TXTPTR+1 




0323 20A6D9 




JSR REMN 


;FIND END OF LINE 


0326 2098D9 




JSR AECON 


;SET TXTPTR TO END CF LINE 


0329 A5B8 




IDA TXTPTR 




032B A4B9 




LEY TXTPTR+1 




032D 653E 




STA A2 


; STORE ENDING ADDRESS AT A2 


C32F 843F 




STY A2+1 




C331 20B3FD 




JSR XAM 


; DISPLAY MEMORY FROM Al TO A2 


0334 4C69FF 




JMP MCNZ 


;ENTER MONITOR MODE 


0337 




END 
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of the PRINT statement, locating the 
$5A, and replacing it with $5B. In the 
case of an Applesoft program composed 
of only a few lines, this can be done by 
direct inspection of memory using the 
Monitor. But, if your program has hun- 
dreds of lines, then another method is 
called for. 

Given in listing 1 is a short, 
machine language program which is in- 
voked (from BASIC command mode) 
by a statement of the form 

CALL LOCATION, LINE 

where LOCATION is the location (in 
decimal) of the machine language 
routine (it is relocatable), and LINE is 
the number of the line in the program 
to be searched for. If the routine finds 
the line, then it will display the bytes 
constituting the line and leave you in 
Monitor mode. (To return to BASIC 
command mode, enter Control-C.) If 
there is no line of the specified number 
in the Applesoft program, then the only 
result is a beep. 



Suppose the routine is loaded or 
assembled at $300 (decimal 768), your 
Applesoft program is in RAM, and you 
wish to find the location of line 3370, 
which is, say, PROMT "]X". If you enter 
CALL 768,3370 then the bytes con- 
stituting the line will be displayed as 
follows: 

xxxx- yy zz 2A 0D BA 22 5D 5A 
22 00 

where xxxx is the address of the start of 
the line, yy zz is the pointer to the 
beginning of the next line (low-byte 
first), 2A 0D is the line number in hex- 
adecimal (low-byte first), and 00 is the 
end-of-line token. The remaining five 
bytes are the tokenized form of the 
statement PRINT "]Z" (PRINT is 
represented by one byte: BA). If, for ex- 
ample, the address of the line is $1A92 
then (from Monitor mode) you can enter: 

1A99: 5B 

which has the effect of replacing the 
byte '5A' with the byte '5B'. If (after 



LISP 



for the Apple II 



Pegasys Systems' new P-LISP interpreter is a full implementation of the 
well-known Artificial Intelligence language. Written in machine code, 
this powerful interpreter includes the following features: 



Over 55 functions implemented 
Extensive 45-page User Manual 
Full function trace 
Function editor and pretty-printer 
Floating point math 



Break mode for function debugging 

Detailed error messages 

Lores and Hires graphics 

PROG construct, EXPRs, and FEXPRs 

Atom property lists 



ELIZA, TOWERS OF HANOI, and other sample programs included 

Also available: The P-LISP Tutorial, an introductory text designed to 
give the reader a complete understanding of the LISP language. 

P-LISP is supplied on disk with User Manual for $99.95 (specify DOS ver- 
sion). The manual is available separately for $10.00. The P-LISP Tutorial 
is available for $15.00. Requires a 48K Apple II or 11+ with disk. Floating 
point math and Hires graphics require Applesoft in ROM. 

PEGASYS SYSTEMS, INC. 

4005 Chestnut Street 
Philadelphia, PA 19104 
Orders only: 800-523-0725 

PA residents and inquiries: (215) 387-1500 

Pennsylvania residents add 6% sales tax 4Mht *■■■ 

Apple is a trademark of Apple Computer, Inc. !^^H W^H 

Good software is no longer a myth. 




Control-C-ing back to BASIC) the line 
is then LISTed, it will appear as PRINT 
"][", and will print accordingly. 



For those readers without assem- 
blers, the routine may be entered from 
Monitor mode by typing in 300: 20 BE 
DE 20 OC .... (See listing 1 for the re- 
maining bytes.) Once entered, it may 
be saved to disk by entering BSAVE 
LINE FINDER, A$300, L$37. To use it, 
BLOAD LINE FINDER and proceed as 
above. 

Apart from the utility, this routine 
is interesting because it relies almost 
entirely on subroutines in the Apple- 
soft Interpreter and the Monitor, which 
is why it is only 55 bytes long. The five 
Applesoft subroutines and three Moni- 
tor subroutines which are used are given 
in listing 1 along with their addresses. 

The routine works as follows: after 
you enter, e.g., CALL 768,3370, this 
statement is placed in the buffer (at 
$200) and the zero page pointer TXT- 
PTR is set to the first byte (the token 
for CALL). Upon invocation of the 
routine at location 768, TXTPTR is 
pointing to the comma, and the sub- 
routine CHKCOM checks for this. (If 
there is no comma, a syntax error 
message results.) The routine then gets O 
the line number using the subroutine ^| 
LFNGET, and places this (in hex- 
adecimal form, low byte first) at LIN- 
NUM. The subroutine FNDLIN picks 
up this number and searches the Apple- 
soft program for the line so numbered. 
If it does not find such a line, it returns 
with the carry flag clear. In this case 
the routine sounds the bell and returns 
to BASIC command mode. 

If FNDLIN finds the line, then it 
returns with the carry flag set. It then 
deposits the address of the line at 
LOWTR (low byte first, as usual). The 
routine stores this address at Al, for 
later use by the subroutine XAM 
(eXAMine memory), which will 
display the bytes constituting the line. 

Having found the address of the 
beginning of the line, the subroutines 
REMN and ADDON are used to find 
the address of the end. In order to use 
the subroutine REMN, which searches 
from the byte pointed to, by TXTPTR, 
until it finds an end-of-line token (00), 
the routine first sets TXTPTR to four 
places past the beginning of the line. 
This is to skip the link pointer and the 
line number, since the line number | 
may contain 00 (as in 0A 00, represent- ^ 
ing 10), which would mislead REMN. 
REMN is then invoked, and returns 
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with the offset to the end-of-line in the 
Y register. ADDON adds this offset to 
TXTPTR, so that TXTPTR is then point- 
ing to the end of the line. This address 
is stored at A2, and XAM is invoked to 
display the bytes from Al to A2. 



Readers wishing a fuller under- 
standing should consult the aforemen- 
tioned article by John Crossley, and the 
Apple manual entitled Apple II 
Monitors Peeled, for details of the 
subroutines given in listing 1 . 



While studying mathematics and 
philosophy in the late 1960's, Peter Meyer 
wrote programs in FORTRAN for scientific 
and technical applications. He acquired an 
Apple in early 1980 and proceeded to 
develop the memo program Agenda Files 
(Special Delivery Software). Currently he 
is studying the internals of Applesoft, and 
is designing a system for interfacing 
Applesoft programs with machine language 
subroutines. 



JUCftO 
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■■■■■'^<&*':? i ''~' " 

SOFTWARE AUTHORS! 

for Apple, Atari, TRS-80. NEC, Hitachi 

Brdderbund Software is looking for new authors to join its 
international team of programmers. If you have a product for 
the micro market, let us show you the advantages of working 
with our team of design, production and distribution 
specialists. "**'i'jami!«Rj)f-' 

Call or write for our free Authors Kit today or send us a 
machine readable copy of your work for prompt review under.: 
strictest confidence. 



■*\«* 



kJerbund So ft war 



miimmuiiiillUMJIIlimgmiMI'U.f 

t"'.V #2 Vista Wood Way, San Rafael, CA 94901 (415)456-6424 ,-.., 





DOUBLE DOS PLUS 

for Apple Computers 



201-839-3478 




OTHER UNIQUE PWODUCTS FWOMJMCWO-WABE DISTRIBUTING Md 



Sff 




THE APPLE CARD — Two sided 100% plastic reference card lor Ihe Apple computer 
Loaded with information of interest to all Apple owners $3.98 

PARALLEL PRINTER CARD— PPC100— A Universal Centronics type parallel printer 
board complete with cable and connector This unique board allows you to (urn on and olf 
the high bit so that you can access additional features in many printers. Use with EPSON. 
ANADEX. STARWRITER. NEC. SANDERS. OKI, and other with slandard Centronics 



configuration 



$139.00 



DOUBLE DOS Plus— a piggyback board that plugs into the 
disk-controller card so that you can switch select between 
DOS 3.2 and DOS 3.3. Works with the language system elimi- 
nating the need in many cases to boot the BASICS disk. Also 
eliminates the chore of converting all of your 3.2 disks to 3.3 

NOTE: APPLE is a registered trademark of APPLE Computer, Inc., Cupertino, CA. 

WHY IS DOUBLE DOS PLus batter? 

• Nothing needs to be soldered, just plug in and go. 

• Since all four ROMS are used, all software will work, 
even early 3.1 DOS. 

• Because the ROMS fit on the back of the board, it has 
the thinnest configuration allowing full use of slot #7 

• One set of ROMS is powered up at a time, thus saving 

power. DOUBLE DOS Plus require* APPLE DOS ROMS 

• Full 90-day warranty from TYMAC. 
MICRO-WARE DISTRIBUTING INC. 
P.O. BOX 113 
POMPTON PLAINS, N.J. 07444 




1uni.il'"'" i. -tOTp 

THE DOUBLE BOOTER ROM— Plugs into (he empty 08 Socket on the Apple mother- 
board or the integer ROM Card to provide a 13 sector boot wilhout using the 8ASlCs Disk 
DouDleBooter may also be used in the MOUNTAIN HARDWARE ROM PLUS board This 
chip will not work in a plus machine unless it contains an Integer board or a ROM Plus 
board $29 00 

DISK STIX— Contains '0 dozen diskette labels with either 3.3 or 3.2 designation Room 
for program names and type also $3.98 

*********** * SOFTWARE ************* 
SUPER SEA WAR— Hires battleship type simulation . $13.96 

ULTIMATE XFER— A telephone software transfer program, uses DC Hayes Assoc 
micfomodem $25.00 

ROAD RALLYE— Hires driving game with 5 different full screen tracks $15 00 

MISSILE CHALLENGER— Hires arcade type game where you defend your cities Irom 
falling missiles. 8 levels & writes name & high score to disk $19,95 

SUPER PIX— Hires screen dump for the EPSON MX-80. inverse or normal, larger than full 
page graphics in 2 orientations Needs Tymac PPC-iOO Printer board or we will upgrade 
your EPSON board for $25 $39.95 

GRAPH-FIT— A hires graphing program that produces bar charts, pie charts and line 
graphs. Has auto scaling feature too $2? 00 

— i^mbbSTILL MORE APPLE GOODIES^^—*" 

APPLE KEYBOARD SYNTHESIZER— 49 note (C to C) AGO Keyboard with 3 sawtooth sq wave 
sftapers, » audio oscitators. 3 low pass fitters, 4-64 point shape controllers. 2 envelope 

generators. Complete system $995 

KEYBOARD ONLY with Apple Interface $649 

GRAPHIC NOTEWRITER— Hires note write for synthesizer system $99 

SUPERPIX OKI— Hires screen dump for OKI Microline 80. 82, 83 Printers. Same features as 

super pix. Needs Tymac PPC-1 00 Board $24.95 

NIBBLES AWAY— The best disk back up program to date Allows you to make backups of mos; 
every drsk ever produced for the Apple. Over 1 user defined parameters including synchronized 

ft unaynchronized copies as weH as automatic hat* tracking and raw date transfer $59 

Cal 201 -839-3478 
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"EX V 01 (Continued from page 35) 

user "stack," which is a series of 
memory locations used for most lan- 
guage operations and much data storage. 

A pointer to the next available loca- 
tion is constantly maintained as values 
and addresses are PUSHed onto it or 
POPped from it. Most operations act on 
one or both of the top two entries, re- 
moving them and replacing them with 
the result of the operation. For in- 
stance, to add 5 and 3, you would first 
PUSH a 5 onto the stack, then PUSH a 
3, and finally invoke the + operation 
which would POP both the 5 and the 3 
and leave only the result of the opera- 
tion on the stack: an 8. 

RPL provides all of the necessary 
stack operations, including ones that 
allow rolling an entry to the top from a 
specified depth and interchanging the 
top two entries. It allows conditional 
branching, Boolean operations, PEEKs 
and POKEs and their 16-bit equiva- 
lents, subroutines, nested FOR... 
NEXT loops, nested IF.. .THEN. ..ELSE 
constructions, random numbers, GET, 
INPUT and even the dreaded GOTO. 
Character string manipulation and 
printing take a little extra effort, but 
are straightforward. The RPL opera- 
tions actually end up allowing more 
flexibility. 

Surely there must be some things 
missing. But of course! Numbers may 
only be 16-bit integers (-32768 to 
32767, or to 65535], although rou- 
tines to handle floating point numbers 
and larger integers could certainly be 
written. The built-in file-handling 
capabilities of BASIC are not dupli- 
cated. Also, all of the higher mathema- 
tical functions, like trig functions, 
square roots, and such, are lacking. 



Line numbers are used only in 
editing and error detection. They have 
no meaning in the program flow. In- 
stead you use symbols to label parts of 
your program. Symbols may be defined 
globally or locally, making the develop- 
ment of a subroutine library very easy. 
It is also possible to use symbolic con- 
stants, which can be defined at "com- 
pile time." 

One big advantage of RPL is that it 
uses the PET editor, so you don't have 
to get used to a different, less powerful 
editor. BASIC and the PET's machine 
language monitor are available while 
RPL is present, so it is easy to load and 
save both source and object files. Inclu- 
sion of machine language routines for 



A program to fill the screen with PET characters. 
The BASIC version runs considerably slower than the RPL 


version. 


Economy BASIC Version 










1 6 F R I = T 9 9 9 


rPQKE: 




"68+1 .. IHHD25e 


sNEXl 


Source for RPL Version 










1. 33 7 67 32 7 G 8 


FOR F 


-N 


# POKE NEKT 





the ultimate in speed and economy of 
space is also very easy, especially with 
the forthcoming Samurai assembler 
which will use the same symbol tabic 
structure as RPL. Interfacing to BASIC 
is possible too, but the process is a lit- 
tle more involved. 

If you have never spent much time 
with H-P calculators or FORTH, stack 
manipulation might be a little confus- 
ing. Samurai Software has available a 
program called "SIM," a symbolic 
debugger for programs written in RPL, 
which can be included on the same disk 
or cassette with RPL. Not only does 
this allow stepping through a program, 
setting breakpoints, PUSHing, PULL- 
ing, and setting the PC, but it also 
shows each operation before it is ex- 
ecuted and then shows the results of 
the contents of the stack. This program 
is almost essential for debugging, since 
the only runtime error message is "P!" 
to indicate stack over- or underflow. It 
also illustrates the intricacies of stack 
manipulation very nicely. 

The documentation is about the 
best I have ever seen. The manual 
begins with enough information to get 
anyone programming quickly, followed 
by a section on more advanced tech- 
niques. (There are appendices with 
other information.) 

RPL is not a standard language, 
although it has more in common with 
FORTH than any other. Instead of the 
"threaded" structure of FORTH, RPL 
uses a P-code structure like Pascal. RPL 
is generally faster and more conservative 
of memory than FORTH. FORTH can 
be applied on nearly every computer, 
while you can use RPL only on a 
CBM/PET. FORTH's portability has a 
cost, in that routines that already exist 
in the PET's ROMs (or any other 
machine's operating system) must be 



duplicated, thus eating up valuable 
memory. 

RPL will serve well the need for a 
language that is faster than BASIC yet 
easier to program than assembly lan- 
guage. The package is well-thought-out 
and well-documented. RPL is more dif- 
ficult to program than BASIC and more 
difficult to read, but it does have many 
elements of the structured languages 
like Pascal. Its intimacy with the PET 
operating system is an advantage over 
FORTH in speed and memory conser- 
vation, but it makes it impossible to 
run on a non-PET. 



RPL is available from Samurai Soft- 
ware (P.O. Box 2902, Pompano Beach, 
FL 33062) for $49.95 on disk or $44.95 
on cassette. Specify your ROM and disk 
drive types. 

Commodore Announces 
New Products 

Six new books dealing with various 
aspects of the new SuperPET system 
are now available: 

1. System Overview $ 5.95 

2. Waterloo microAPL $ 9.95 

3. Waterloo microBASIC $10.95 

4. Waterloo microFORTRAN $10.95 

5. Waterloo microPascal $10.95 

6. Waterloo 6809 Assembler $10.95 

A new high-speed printer, the CBM 
8023P, is now available for $995. It 
features bidirectional printing at 150 
cps in up to 136 columns, and both 
tractor and friction feeds. Upper and 
lower case are available, as well as PET 
graphic characters and user-defined 
characters. There is also RAM available 
for formatting data. 
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Take Charge!!. 



. . .EASILY! 

Take charge of your growing collection of disk-based software. 



\nttO 



**• Disk Library* 

The Software Management System 



Disk Library is an elegant, user-oriented system for creating 
and maintaining a thorough, cross-referenced Index of all 
your disk-based programs and data files. It provides for 
Automatic entry into your Library file of the full catalog of 
any Apple* diskette. Disks formatted under other operating 
systems (such as Pascal and CP/M*) are easily entered 
from the keyboard. Written entirely in machine code, Disk 
Library's operation is both smooth and swift. 



EASY TO OPERATE: 



Menu-driven 

Single keystroke operation 

Full featured Editing 

Super fast Sorts by any field (1200 items sorted in 4 
seconds!) 

Works with all disks created under DOS 3. 1 , 3.2 and 3.3 

User definable Program Types (e.g., Business, Game. 
Utility) of up to 15 characters each can be assigned to 
each program entry with single keystrokes or via block 
actions 

On screen and printed Summaries, by File Type (Integer, 
Applesoft, Binary, Text) and by Program Type (e.g.. 
Accounting, Graphics, Music) 

Effortless data entry 

User-definable prompt defaults 

Block Actions (global editing/deleting) 

Instant Searches... by full or partial string (find any 
item in 1/3 sec!) 

New files can be Appended to existing records, in me- 
mory or on disk 

Unique Feature: User can redefine the Disk Volume 
Number displayed by the DOS Catalog Command 

A Unique Volume Identifier and Disk Title can be assigned 
to each disk entry in your Library file. 

Printed Reports are attractively formatted for easy 
readability 



EASY TO LEARN: 



• A 75 page, professionally prepared User's Manual is 
provided; including: 



• Introductory Tutorial, will have you using Disk Library in 
10 minutes 

• Advanced Tutorial, enables you to master Disk Library's 
many advanced features 

• Reference Section, provides quick answers for experienced 
users 

• Applications Section, gives you many ideas for maintaining 
your library 

• Index, enables you to find whatever you need 



EASY TO ORDER: 



The EASY WAY: send check or money order to: 

■ ■MODULAR 
□■MEDIA 

The EASIEST way: use your Visa or M asterCar d — ANY 
DAY, ANY TIME- 






TOLL FREE: 

(Orders Only): 1-800-331-1750, ask for Operator 948. 
Dept. 400. 

(InOkla.): 1-800-722-3600, ask lor Operator 948 

PRICE: 

Special Introductory Offer (Until Feb. 28, 1982) -$39.95. 
Regular Price - $49.95 

WHAT YOU NEED: 

• A 48K Apple II or II + 

• A disk drive, with DOS 3.3 

• A printer (optional but desirable) 

• A desire to get organized! 

INQUIRIES, please call or write: 

■■MODULAR 
□■MEDIA 

1 1060 Paradela St., Miami, FL 33156 (305) 661-7310 
Developers/Publishers of Innovative Software 

' Apple. Apple H and Apple II + are regisiered trademarks ol Apple Computer, lac 
CP^M is a registeied itodemoikof Digital Research. Inc. 
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Applesoft and Matrices 



This machine language program 
performs the most commonly 
used special matrix operations, 
as well as most Applesoft 
operations. The program can be 
linked to Applesoft by means of 
the & statement. Two advantages 
of using this program rather 
than a BASIC subroutine are a 
significant Increase in execution 
speed (on the average a factor 5) 
and greater convenience. The 
required system configuration 
for the program is a 48K Apple 
with Applesoft in ROM (or in the 
Language Card). 



Cornells Bongers 
Erasmus University 
Postbox 1738 
3000 DR Rotterdam, 
The Netherlands 



For those who are not accustomed to 
working with matrices, a matrix is a 
block of numbers. Several operations 
can be performed on a matrix or a pair of 
matrices. For instance, adding two 
matrices A and B together, we obtain a 
matrix C, whose elements consist of the 
sums of the corresponding elements of A 
and B. Thus if, 



A = 



and 



B = 



then the sum of A and B is 



- - 


" 


1 

2 

4 


3 5 

1 4 

-2 1 



2 4 


7 


1 8 


-6 


5 


1 



c = 



3 7 12 
3 9-2 
9-2 2 



It will be clear that A, B, and C can 
be represented by three 2-dimensional 
arrays in BASIC. When A and B have to 
be added, the following BASIC routine 
may be used: 

100 FOR 1 = 1 TO N: FOR J=1 

TO M: C(I,J) = A(I,J) + B(I,J): 
NEXTJJ 

where N and M arc both equal to 3 in 
our example. When using the machine 
language program, this routine can be 
replaced by the statement: 

100 &C = A + B 

Note that by using the latter state- 
ment, the names of the matrices are ir- 
relevant. In the BASIC routine the 
names of the matrices always must be 
A, B, and C to comply with the names of 
the BASIC arrays. 

Applesoft Operations 

Except for comparison, SCRN(, and 
CHR$, all the Applesoft operators and 
functions that can be used on real 
variables or expressions are available for 
matrix operations. There are, however, 
some restrictions on the syntax of the 
matrix statement. First, no more than 3 
matrices may be used in a matrix state- 
ment. Second, single- valued expressions 
(or variables) must be put between 
brackets. Another restriction is that 
matrices used in an & statement must 
have two dimensions. Each of these 
dimensions must be larger than and 
smaller than 255. Furthermore, each 
matrix appearing in an & statement 
must have been dimensioned previously 
by means of a DIM statement. For the 
exact syntax of the matrix statement we 
refer to the 'Instructions' section of the 
article. Some examples are listed below. 

Example 1: 

10 DIM A(10,10): B=1 
20 &A = (B): A = RND(A): 
A = A*(10): A=INT(A) 



In this example, the array A is set 
equal to 1. Next, the RND function is 
performed on all elements of A, so that 
A now contains random numbers be- 
tween and 1 . Then A is multiplied by 
10, and the INT function is executed on 
each element of A. After the execution 
of line 20, A is thus filled with random 
numbers between and 9. Note that the 
statement A=(RND|1)| puts all elements 
of A equal to the same random number. 



Example 2: 

10 DIM A(5,6), B(5,6). C(5,6) 
20 B = 3 

30 &A = (3): B = (2): C = A*B: 
C = C A(B) 



The statement C = A*B multiplies 
the corresponding elements of A and B 
and stores the result in the correspond- 
ing elements of C. After the execution 
of this statement, all elements of C are 
therefore equal to 6. Note that for a suc- 
cessful execution of the statement, A, 
B, and C must have the same dimen- 
sion (or order). By means of the last 
statement, all elements of C are raised 
to the third power. If, instead of the 
statement C = CA(B), the statement 
C = C A B is used, all elements of C will 
become equal to the second power of 6, 
because now the matrix B instead of 
the variable B is taken. 



Matrix Operations 

Although the operations and func- 
tions used in the examples above can be 
handy sometimes, they hardly justify 
the writing of a machine language pro- 
gram. The real usefulness of the pro- 
gram is, therefore, not its ability to per- 
form Applesoft functions and opera- 
tions, but rather to handle some specific 
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matrix operations as well. The follow- 
ing operations are implemented: 

1 . A = IDN(flexpr) where A must be 
a square matrix and 1 <■ = aexpr < = N if 
N is the order of A. This statement puts 
A equal to a matrix consisting of zeros 
and ones. If aexpi equals one, A becomes 
the identity matrix. For larger values of 
aexpr, the columns of the identity 
matrix will be rotated aexpr — 1 posi- 
tions to the left. For instance, if A and B 
are square matrices of order 3, then 
A = IDN(1) and B=IDN(2) return. 



A = 



1 











1 











1 








T 


i 











1 






B = 



2. A = TRN(B) puts A equal to the 
transpose of B. If B is of order p by q, 
then A must be of order q by p. Putting a 
matrix equal to its own transpose (i.e. 
A = TRN(A)) is not allowed. For in- 
stance, if B equals, 



B = 



1 2 
3 4 
5 



then A = TRN(B) will return 



A = 



3. A = B.C puts A equal to the 
matrix product of B and C. If B is of 
order p by q, then the first dimension of 
C must equal q. In case the second 
dimension of C equals r (thus C is q by 
r|, the matrix A has to be of the order p 
by r. Furthermore, the matrix on the left 
of the " = " sign may not equal one of 
the matrices on the right of the " = ." As 
an example, we can multiply the 
matrices A and B in the example above 
by means of the statement &C = A.B. 
This leads to 



[35 14] 
[j4 2fJ 



4. A = MIN(B), A = MAX(B) or 
A = ABM(B) put A respectively equal to 
the minima, the maxima, or the abso- 
lute maxima of the columns of B. The 
overall maximum, minimum, or abso- 
lute maximum of B is stored in A(0, 1 1 . If 
B is of order p by q, then A must be of 
order q by 1 . 



5. A = INV(B) puts A equal to the in- 
verse of B and stores the determinant of 
B in A(0,0). A and B must be square and 
of the same order. The statement 
D = INV(C), where C equals the matrix 
above, returns for instance, 



D = 



.0396825397 - .0277777778 
- .0277777778 .0694444444 



At the execution of the inverse state- 
ment, values stored in the 0th row of the 
target matrix will be destroyed since 
this row is used to store some pointers. 
To obtain the inverse of a matrix A, the 
statement A = INV(A| also may be used. 
Finally, zeros on the main diagonal of 
the matrix to be inverted are allowed. 

6. A = NEINV(B) gives the same 
result as A = INV(B] except that the pro- 
gram continues if a division by zero oc- 
curs when B is singular. When using 
NEINV, it is recommended to check the 
determinant of B (in A(0,0)| after execu- 
tion of the statement. When B is 
singular, the determinant will be zero. 

7. A = PNT {aexpr) displays the 
matrix A. For each element of A, aexpr 
positions are reserved, and a carriage 
return is generated after each row. If 
aexpr equals zero, the elements of A are 
separated by a blank. 



An Application 

An interesting application of matrix 
algebra is the linear model. The linear 
model can be used to analyze the in- 
fluence of a number of variables, called 
the independent variables, on another 
variable, called the dependent variable. 
The model has the form. 



y = b + b, x, 

■ • b m x m + u • 



b 2 x 2 



+ 



where y denotes the dependent variable, 
and x,, x 2 , etc., denote the independent 
variables. 



The last term, u, represents the in- 
fluence of factors that were not included 
in the model. Usually this term is called 
the residual. As an example, suppose 
that we want to establish the relation- 
ship between the annual regional sales 
of a particular product (y|, the number of 
times advertised (x,) and the number of 
people living in trie region |x„|. The 
available 
below. 



Obs. 


Y 


X l 


Xz 

Popul 


No. 


Sales 


Advert. 


1 


118 


8 


583 


2 


138 


9 


692 


3 


104 


5 


1082 


4 


65 


1 


836 


5 


46 


1 


628 


6 


61 


2 


244 


7 


48 


1 


632 


8 


66 


2 


172 


9 


78 


5 


319 


10 


69 


2 


383 



data are given in the tabic 



In matrix algebra the model can be 
written as, 

Y = X.B + U, 

where B (the unknown coefficients) is of 
order 3 by 1 and Y (the sales), and U (the 
residuals) are of order 10 by 1. The 
matrix X is of order 10 by 3. The 
elements of the first column of X are 
equal to one (to account for b ) whereas 
the second and third columns correspond 
to the columns under the heading Xj, 
and Xj in the table. To fit the equation 
to the data, the least squares principle is 
used, which means that the coefficients 
are chosen such that the sum of the 
squares of the elements of U is mini- 
mized. This leads to the following solu- 
tion for B, 

B = (X 1 .X- 1 )X' .Y 

where X ' denotes the transpose of X. A 
BASIC program to compute the least 
squares solution is presented in listing 
1, with the results of the example. The 
least squares equation shows that the 
sales increase by 9.5 for each additional 
advertisement (other things being equal) 
whereas an increase of 100 in the 
population of the region increases the 
sales by 1.6 (other things being equal). 



The application given in this sec- 
tion was kept simple purposely. The 
linear model, for instance, can easily be 
extended with a tremendous amount of 
statistics which may (or may not) 
simplify the analysis of the data. Also 
the application presented gives only a 
narrow view on the wide field of prob- 
lems in which matrix algebra may be 
.useful. Examples include computations 
with Markov-type problems and the 
location of the maximum (or minimum) 
of a function of several variables by 
means of the Newton method. 



The Machine Language Program 

The hex dump of the program is 
presented in listing 2. As can be seen, it 
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is about $700 bytes long and starts at 
$8900. The end is at $8FF2, which 
means that the area $9000-$9600 is free 
for other routines. 

After the hex dump has been keyed 
in and saved, the program can be con- 
nected to an Applesoft program by 
means of the command : BRUN pro- 
gram name or, if you don't have a disk, 
by the monitor command : 8900 G. In 
the latter case you must enter Applesoft 
via the warm start (i.e., Control-C). The 
BRUN or 8900 G command executes the 
initialization routine at the start of the 
program that sets HIMEM to the appro- 
priate value and installs the & vector. In 
case the & vector is destroyed during ex- 
ecution of a program, the matrix pro- 
gram can be reconnected by the com- 
mand CALL 35072. 



The program extensively uses zero 
page locations to increase execution 
speed. However, as a consequence, the 
ON ERR flag will be temporarily cleared 
during the execution of an & line since 
the matrix routines use the storage 
space of the ON ERR pointers. After the 
execution of the & line, the ON ERR flag 
and pointers are restored to their 
original values. Apart from zero page 
locations, the control Y and the & vec- 
tor are used, which implies that values 
stored at $3F5 - $3FA will be destroyed. 



In Case of an Error 

If the interpreter returns an error 
message during the execution of an & 
line, there is either a bug in your state- 
ment or a bug in my program. In the 
first case, the error is probably caused 
by the violation of one of the following 
conditions: 

1 Only matrices containing reals are 
allowed in the & line. 

2. Matrices used in an & statement 
must have 2 dimensions. 

3. Each dimension of a matrix must be 
larger than and smaller than 255. 

4. The orders of the matrices should 
satisfy the conditions in the "in- 
structions" section of this article. 

5. Each matrix appearing in an & state- 
ment must have been dimensioned 
earlier in the program by a DIM 
statement. 

6. ON ERR doesn't work during the ex- 
ecution of an & line. 

Although the other case (i.e. a bug in 
my program) seems at this time highly 
improbable to me since the program was 
heavily tested for several months, I am 



well aware that there are some kinds of 
bugs that can, as it seems, only be 
discovered by other people. Therefore, if 
you find one, I would appreciate it very 
much if you let me know. 

Finally, a utility package which con- 
tains, among others, the matrix pro- 
gram, will be released soon. This utility 
package resides in the second 4K bank of 
the Language Card, and it will use only 
$300 bytes of 'normal' RAM. 



Instructions 

This section contains the matrix ex- 
pressions that can be executed by means 
of the & line. The syntax of the line is: 

& matrix expression: matrix 
expression : etc. 

The following operators and functions 
may be used: 

operator := + ,—,*,/, ^ 
AND.OR 

function := SGN, INT, ABS, 

USR, FRE, PDL, POS, 
SQR, RND, LOG, EXP, 
COS, SIN, TAN, ATN, 
PEEK 



The powerful package: 
Super-Text II™ 



plus Form Letter™ 



Allows you to learn the basics of text editing 
quickly. Advanced features will meet your 
expanding word processing requirements 
far into the future. $150.00 



Stores names, addresses, and telephone 
numbers and prints mailing labels. Has 
user-definable category system. $49.95 



W** "^ llUUr vOO DUUli Provides automatic repetitive printing of letters. 

Allows insertion anywhere in a letter, also direct 
entry, optional prompting, special commands. 

$100.00 

From the leader in word processing 
for the Apple II or II Plus 



MUSE 



SOFTWARE" 



330 N. CHARLES STREET 
BALTIMORE, MD 21201 
.(301)659-7212 



Ca" c* write 'o< information ana 

th© name C your nearest MUSE Oeaier 



Unless stated otherwise, matrices 
appearing in an & statement must have 
the same order, and matrix names on 
the left of the " = " sign can be chosen 
equal to matrix names on the right of 
the "=". The matrix expressions that 
are allowed are listed below. 



1.4 3 matrices 

A = B operator C 

Example: 
A = B/C 



/. Applesoft Operations and Functions U. Specific Matrix Operations 
with: 

2.1 A = TDN(aexpr) — Identity: A must 
1.1 1 matrix and 1 expression be square and 1<= aexpr < = 

A = (aexpr) order of A. 



Example: 

A = (-1/2), B = (Z%) 

1.2 2 matrices 
A = B 

A = -B 
A = NOT B 
A = function(B) 

Example: 
A = SIN(B) 

1.3 2 matrices and 1 expression 
A = B operator (aexpr) 

Example: 

A = B A (COS( 3)) 



2.2 A = TRN(B) — Transpose: if B is of 
order p by q, then A must be of 
order q by p. A = TRN(A) is not 
allowed. 

2.3 A = B.C — Multiplication: if B is of 
order p by q and C of order q by r, 
then A must be of order p by r. 
A = A.C or A = C.A is not allowed. 

2.4 A = MIN(B), A = MAXfB), A = 
ABM(B) — Minimum, maximum 
or absolute maximum: if B is of 
order p by q then A must be of order 
q by 1. After execution A(0,1) con- 
tains the overall minimum, max- 
imum or absolute maximum of B. 



2.5 A = INV(B) — Inverse: A and B 
must be square and of the same 
order. After execution, A(0,0) con- 
tains the determinant of B. 

2.6 A = NEINV(B) — Inverse: same as 
INV, except that singularity of B 
doesn't stop the program. 

2.7 A = PNT(aexpr) — Print: if 
aexpr = the elements are separated 
by a blank, else aexpr positions are 
reserved for each element. 



Cornells Bongers is an assistant professor 
of statistics at the Erasmus University in 
Rotterdam, The Netherlands. He uses his 
Apple for solving statistical problems, 
such as likelihood maximization and the 
estimation of the parameters of density 
functions. As a hobby, he develops 
machine language utility programs for the 
Apple to extend Applesoft, via the & 
instruction, with several functions that are 
not implemented, such as PRINT USING, 
Sort and Storing and Recalling arrays to or 
from disk. 



Listing 1 



10 
20 

zo 

40 

50 

60 

70 

80 

90 

100 

110 

.20 

130 

140 

150 

140 

170 

180 

190 

200 

210 

220 

230 

240 

250 

240 

270 

280 

2«0 

300 

no 

320 
530 
.'.40 
330 



PRINT 



';Y(I,1):X(I,1> - 1 



VECTOR*: PRINT 



■■;X(I,J) 



REM THE LINEAR MODEL 
HOME 

IKPU1 'NUMBER OF OBSERVATIONS ? ";N 

INPUT -NUMBER OF INDEPENDENT VARIABLES ? ";M:M1 ■ M + 1 
IF Ml > = N THEN PRINT : PRINT "TOO FEU OBSERVATIONS ": STOP 
DIM XCN,Ml>,XA(Ml,N),r<N,l),B<Ml,l),E(N,l),EAU,N),S(Ml,Hl> 
DIM VH1,1),V2'.1,1>,H<M1,1),J(1,N> 
PRINT : PRINT "INPUT THE ELEMENTS OF THE Y-VECT0R" 
vOR I = 1 TO N 
PRINT -ELiMiNT ";!;■ ? ■;: INPUT 

NEXT I 

F0K J = 2 TO Ml 

PRINT -. PRINT "INPUT THE ELEMENTS OF THE X'jJ - 1;" 

FOR I = 1 TO N 

PRINT "ELEMENT ";I;" ? ";: INPUT 

NEXT I, J 

REM CALCULATE RESULTS 

5 Xfl = TRN(X):S = XA.X:S = NEINV(S):H = XA.Y:B = S.H 
IF S(0,0> « THEN PRINT "THE S-MATRIX IS SINGULAR": STOP 
PRINT : PRINT "THE LEAST SQUARES EQUATION EQUALS ": PRINT 
PRINT "Y = ";B(1,1>; 

FOR J = 2 TO Ml: IF B(J,1) > = THEN PRINT '+»j 
PRINT B(J,1);"«X";J - 1; 
NEXT : PRINT : PRINT 

E = X.B:EA = TRN(E):E = Y - E 

"»* THE TABLE OF RESIDUALS »»": PRINT 

■NO"; TAB( 4); -OBSERVED Y"; TAB! 16) ; 'ESTIMATED Y"; TAB( 29) ; "RESIDUAL 1 
= 1 TO N 

I; TAB( 4);Y(I,1); TAB( 16>;EAU,I); TAB< 29>;EU,1> 
NEXT I: PRINT 

6 EA = TRN(E):V1 ■ EA.E 

PRINT -STANDARD DEV. RESIDUALS: •; SQR <V1<1,1> / (N - Ml)) 
iJ= <:>:V2 = J.Y:V2 = V2 / (N):E = Y - (V2<1,1)):EA « TRN(E):V2 = EA.E 

R - (V2(l,l) - Vl(l,l>> / V2(l,l): IF R < THEN R = 
PRINT -R A 2 - ;: HTAB (24): PRINT ': ■; 3QR <R> 
END 



ii 

PRINT 
PRINT 
FOR I 
PRINT 



Output of the Example 



THE lEAST SQUARES E0UA1 iOn EQUALS 

Y o 35.9V42408-t?.5463797w*Xl+.016011989i«X2 

«* THE TABLE OF RESIDUALS »» 

NO OBSERVED Y ESTIMATED Y RESIDUAL 



1 118 


121.721758 


-3.7217583 


2 138 


133.017215 


4.98278511 


3 104 


101.086072 


2.91392821 


4 65 


58.9522235 


6.04777649 


5 46 


55.6154898 


-9.6154897 


6 ol 


59.0022456 


1.99775441 


1 48 


55.6796577 


-7.6796577 


8 66 


57.8472224 


8.15277764 


9 78 


38.846034 


•10.046034 


10 69 


61.2320821 


7.7679179 


STANDARD DL 


V. RESIDUALS: 8 


.31192607 


R'2 




97101B0A5 



(Continued on next page) 
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Listing 2: Hex Dump 










8B48- 
8B50- 


A9 
02 


05 

F6 


18 

01 


75 

60 


00 
95 


95 

00 


00 
AO 


90 
00 




















8B58- 


94 


01 


OA 


36 


01 


OA 


36 


01 


8900- 


A9 


00 


85 


73 


A9 


89 


85 


74 


8B60- 


90 


E9 


90 


08 


AO 


05 


84 


FC 


8908- 


A9 


73 


8D 


F6 


03 


A9 


89 


8D 


8B68- 


AO 


00 


FO 


06 


A4 


06 


84 


FC 


8910- 


F7 


03 


60 


A8 


49 


44 


CE 


50 


8B70- 


A4 


07 


84 


FD 


60 


8A 


48 


84 


8918- 


4E 


D4 


4E 


45 


49 


4E 


D6 


49 


8B78- 


AD 


AO 


00 


84 


AE 


A4 


06 


84 


8920- 
8928- 
8930- 


4E 


D6 


54 


52 


CE 


4D 


49 


CE 


8B80- 


64 


A5 


07 


20 


B6 


E2 


18 


6A 


4D 


41 


D8 


41 


42 


CD 


00 


8D 


8B88- 


65 


9B 


85 


1E 


98 


65 


9C 


85 


8E 


8C 


F1 


8D 


EC 


8D 


EF 


8C 


8B90- 


IF 


68 


A2 


A8 


20 


54 


8B 


A2 


8938- 


FC 


8B 


9C 


8B 


9F 


8B 


A2 


00 


8B98- 


1E 


AO 


A8 


DO 


9B 


AO 


80 


2C 




















8BA0- 


AO 


00 


2C 


AO 


40 


A2 


00 


86 


8940- 


00 


00 


00 


00 


A9 


8A 


48 


A9 




















8948- 


CB 


48 


A9 


1 1 


8D 


F9 


03 


A9 


8BA8- 


A5 


A5 


F6 


C5 


F5 


DO 


5C 


A6 


8950- 


8A 


8D 


FA 


03 


A2 


F8 


86 


08 


8BB0- 


F4 


EO 


02 


DO 


56 


CA 


B5 


F6 


8958- 


20 


67 


8A 


A9 


DC 


20 


CO 


DE 


8BB8- 


95 


F4 


B5 


FA 


95 


17 


B5 


CE 


8960- 


C9 


80 


90 


5E 


C9 


C6 


DO 


36 


8BC0- 


95 


06 


CA 


10 


F1 


84 


D7 


A4 


8968- 


AO 


18 


20 


2D 


8A 


20 


67 


8A 


8BC8- 


A5 


84 


A7 


C8 


A2 


00 


20 


75 


8970- 


4C 


OD 


8A 


A2 


06 


B5 


F3 


48 


8BD0- 


8B 


A2 


A8 


A5 


A5 


20 


54 


8B 


8978- 


CA 


DO 


FA 


A5 


D8 


48 


86 


D8 


8BD8- 


4C 


E7 


8B 


A5 


D7 


4A 


BO 


17 


8980- 


20 


44 


89 


20 


B7 


00 


DO 


5C 


8BE0- 


A6 


17 


A4 


18 


20 


2B 


EB 


A2 


8988- 


C9 


00 


DO 


OC 


68 


85 


D8 


A2 


8BE8- 


17 


20 


48 


8B 


A9 


FF 


20 


40 


8990- 


FA 


68 


95 


FA 


E8 


DO 


FA 


60 


8BF0- 


EC 


85 


9D 


45 


D7 


85 


A2 


E6 


8998- 


20 


B1 


00 


4C 


80 


89 


AO 


15 


8BF8- 


A7 


A5 


A7 


C5 


F4 


90 


23 


A5 


89A0- 


C9 


C9 


FO 


C6 


C9 


D2 


90 


3C 


8C00- 


D7 


4A 


90 


OA 


60 


A5 


F4 


C5 


89A8- 


C9 


E3 


BO 


38 


29 


7F 


OA 


A8 


8C08- 


F5 


FO 


F9 


4C 


96 


El 


4A 


BO 


89B0- 


20 


B1 


00 


B9 


DC 


CF 


8D 


F9 


8C10- 


F3 


A2 


01 


E6 


D7 


B5 


FA 


95 


89B8- 


03 


B9 


DD 


CF 


8D 


FA 


03 


4C 


8C18- 


1E 


95 


17 


CA 


10 


F5 


A5 


F4 


89C0- 


04 


8A 


A2 


FF 


86 


D7 


E6 


D7 


8C20- 


85 


F5 


A2 


1E 


AO 


A8 


20 


38 


89C8- 


AO 


FF 


38 


C8 


E8 


BD 


13 


89 


8C28- 


8B 


A5 


A5 


85 


A6 


90 


09 


24 


89D0- 


F1 


B8 


FO 


F7 


E9 


80 


FO 


OF 


8C30- 


D7 


50 


05 


68 


AO 


01 


91 


IE 


89D8- 


BD 


13 


89 


FO 


35 


C9 


80 


BO 


8C38- 


A2 


1E 


20 


48 


8B 


E6 


A6 


A5 


89E0- 


E5 


E8 


90 


F4 


4C 


C9 


DE 


98 


8C40- 


A6 


C5 


F5 


BO 


96 


24 


D7 


50 


89E8- 


A2 


B8 


20 


4A 


8B 


A5 


D7 


FO 


8C48- 


09 


AO 


01 


B1 


1E 


48 


29 


7F 


89F0- 


68 


OA 


AA 


68 


68 


BD 


2D 


89 


8C50- 


91 


1E 


A5 


1E 


A4 


1F 


20 


B2 


89F8- 


48 


BD 


2E 


89 


48 


20 


B1 


00 


8C58- 


EB 


FO 


D4 


45 


D7 


10 


DO 


A5 


8A00- 


EO 


05 


90 


55 


20 


BB 


DE 


20 


8C6C- 


1E 


A4 


1F 


20 


F9 


EA 


A5 


A6 


8A08- 


67 


8A 


20 


B8 


DE 


A2 


80 


86 


8C68- 


85 


08 


A5 


A7 


85 


09 


DO 


BF 


8A10- 


D7 


60 


20 


67 


8A 


FO 


F6 


C9 


8C70- 


A5 


F4 


C5 


F8 


DO 


95 


A5 


F5 


8A18- 


2E 


DO 


26 


68 


68 


A9 


8C 


48 


8C78- 


C5 


F7 


DO 


8F 


A2 


02 


20 


41 


8A20- 


A9 


6F 


48 


20 


B1 


00 


20 


67 


8C80- 


8D 


A5 


F6 


C5 


F9 


DO 


84 


C6 


8A28- 


8A 


A2 


01 


DO 


E2 


18 


B9 


B3 


8C68- 


F4 


FO 


66 


A5 


F5 


85 


CE 


A2 


8A30- 


DO 


c< :; 


01 


8D 


F9 


03 


B9 


B4 


8C90- 


5 


B5 


FC 


95 


17 


CA 


10 


F9 


8A38- 


DO 


69 


00 


8D 


FA 


03 


4C 


B1 


8C98- 


30 


32 


A9 


8C 


48 


A9 


B3 


48 


8A40- 


00 


38 


E9 


C8 


C9 


07 


BO 


9C 


8CA0- 


20 


10 


DE 


A5 


F8 


A4 


F9 


20 


8A48- 


85 


D7 


OA 


65 


D7 


A8 


20 


2D 


8CA8- 


F9 


EA 


A5 


FE 


A4 


FF 


20 


7F 


8A50- 


8A 


C9 


28 


DO 


D1 


A9 


40 


85 


8CB0- 


E9 


4C 


47 


DE 


20 


C1 


E7 


A2 


8A58- 


D7 


20 


67 


DD 


A2 


3F 


86 


FE 


8CB8- 


F8 


20 


51 


8B 


A2 


FE 


20 


48 


8A60- 


AO 


89 


84 


FF 


4C 


2B 


EB 


A9 


8CC0- 


BB 


C6 


CF 


DO 


D5 


A6 


FA 


A4 


8A68- 


40 


85 


14 


20 


E3 


DF 


A6 


08 


8CC8- 


FB 


20 


2B 


EB 


A2 


FA 


20 


48 


8A70- 


A5 


12 


05 


11 


FO 


03 


4C 


76 


8CD0- 
8CD6- 


8B 
48 


C6 

8B 


CE 

85 


FO 
F8 


B2 
A5 


A2 
18 


17 
85 


20 

F9 


8A78- 
8A80- 


DD 
9B 


85 
DO 


14 
46 


AO 

C8 


04 
B1 


A9 
9B 


02 

DO 


D1 

41 


8CE0- 


A5 


19 


85 


FE 


A5 


1 A 


85 


FF 


8A88- 


C8 


B1 


9B 


C9 


02 


90 


3A 


95 


8CE8- 
8CFC- 


A5 
CB 


F6 
60 


85 
20 


CF 
08 


20 
E1 


4E 
A5 


E8 
A1 


FO 
85 


8A90- 
8A98- 


FC 
86 


E8 
08 


C8 
A2 


CO 
9B 


09 
20 


DO 
4A 


ED 
8B 


98 
A6 


8CF8- 


D7 


A9 


FF 


DO 


10 


A5 


F4 


C5 


8AA0- 


08 


95 


00 


A5 


9C 


95 


01 


B5 


8D00- 


F7 


DO 


82 


20 


44 


6D 


A5 


F5 


8AA8- 


FB 


A2 


CE 


20 


54 


8B 


A6 


08 




















8AB0- 


AO 


CE 


20 


38 


8B 


EO 


FA 


DO 


8D08- 


38 


E5 


F6 


DO 


F4 


85 


08 


A5 


8AB8- 


OD 


A2 


01 


B5 


CE 


95 


06 


B5 


8D10- 


08 


10 


03 


20 


8E 


FD 


C6 


F5 


8AC0- 


9B 


95 


1E 


CA 


10 


F5 


4C 


B7 


8D18- 


FO 


D7 


A5 


F4 


85 


F8 


A2 


FA 


8AC8- 


00 


4C 


96 


E1 


A5 


D7 


FO 


10 


8D20- 


20 


48 


8B 


8 5 


FE 


A5 


FB 


85 


8AD0- 


A2 


01 


4A 


90 


02 


A2 


03 


B5 


8D28- 


FF 


A2 


FC 


20 


48 


8B 


C6 


F8 


8AD8- 


F4 


D5 


F6 


DO 


EC 


CA 


10 


F7 


8D30- 


FO 


DD 


A5 


08 


30 


1F 


AO 


04 


8AE0- 


A2 


05 


B5 


FA 


95 


17 


CA 


10 


8D38- 


B1 


FC 


91 


FE 


88 


10 


F9 


30 


8AE8- 


F9 


A5 


F4 


85 


09 


C6 


09 


FO 


8D40- 


3D 


20 


46 


8D 


A2 


00 


A5 


FA 


8AF0- 


56 


A5 


F5 


85 


08 


A2 


17 


20 


8D48- 


D5 


FC 


DO 


A5 


A5 


FB 


D5 


FD 


8AF8- 


48 


8B 


A5 


D7 


FO 


25 


24 


D7 


8D50- 


DO 


9F 


4C 


30 


E4 


A5 


FE 


A4 


8B00- 


70 


07 


30 


OC 


A2 


IB 


2 


48 


8D58- 


FF 


20 


F9 


EA 


20 


34 


ED 


20 


8B08- 


8B 


A5 


1B 


A4 


1C 


20 


P? 


EA 


8D60- 


E7 


E3 


20 


00 


E6 


85 


F9 


38 


8B10- 


A2 


19 


20 


48 


8B 


A5 


19 


A4 


8D68- 


A5 


D7 


AA 


FO 


08 


E5 


F9 


90 


8B18- 


1A 


20 


E3 


E9 


24 


D7 


10 


03 


8D70- 


14 


FO 


06 


AA 


CA 


E8 


20 


4A 


8B20- 


20 


53 


EB 


C6 


08 


FO 


C6 


A5 


8D78- 


F9 


A5 


F9 


20 


40 


DB 


A2 


FE 


8B28- 


9D 


20 


F8 


03 


A6 


17 


A4 


18 


8D80- 


20 


36 


8B 


90 


A4 


A9 


AA 


20 


8B30- 


20 


2B 


EB 


4C 


F5 


8A 


AO 


06 


8D88- 


ED 


FD 


CA 


DO 


FA 


FO 


EF 


20 


8B38- 


18 


3 5 


00 


79 


00 


00 


95 


00 


8D90- 


05 


8C 


20 


08 


E1 


A5 


AO 


FO 


8B40- 


B5 


01 


79 


01 


00 


95 


01 


60 


8D98- 


03 


4C 


99 


E1 


85 


9D 


85 


D7 



8DA0- 


A5 


A1 


FO 


F5 


C5 


F4 


BO 


F1 


8DA8- 
8DB0- 


85 
9B 


FF 
A5 


20 
1F 


EO 

85 


8A 
9C 


A5 
A6 


1E 

FF 


85 

CA 


8DB8- 


AO 


00 


20 


75 


8B 


A2 


06 


20 


8DC0- 
8DC8- 


48 
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A STATISTICAL ANALYSIS 

AND FILE MAINTENANCE SYSTEM 

FOR THE APPLE II™ MICROCOMPUTER 

As a Subset Language of P-STAT™ 78... 
A-STAT™ 79 computes: 

FREQUENCIES 

BI-VARIATE TABLES - CHI SQUARES 

CORRELATION MATRICES 

MULTIPLE REGRESSION 

RESIDUALS 

APPLE PLOT INTERFACE 

APPLE FILE CABINET INTERFACE 

FILE SORT 

AGGREGATION 

REPORT WRITING 

COMPLETE TRANSFORMATION LANGUAGE 

READS VISICALC FILES 

A-STAT™ 79 

Uses Standard DOS Text File and EXEC'S 
48K Version — All programs in Applesoft ,m 

A-STAT™ 79 is available from: 

ROSEN GRAN DON ASSOCIATES 

7807 Whlttler Street 

Tampa, Florida 33617 

(813)985-4911 

A-STAT™ 79 on disk with 80-page manual... $145.00 

Apple II lm is a trademark ol the Apple Computer Inc. 
P-STAT tm 78 is a trademark ol P-STAT Inc.. Princeton. N.J. 
A-STAT tm 79 Is copyrighted by Gary M. Grandon. PhD 



OSI COMPATIBLE HARDWARE 

IO-CA10X SERIAL PORT J125 

ACIA based RS232 serial printer port. OIP SWITCH selectable baud rates of 300-9600 
Handshaking (CTS) input line is provided to signal the computer when the printer butter 
is lull. Compatible with OS45U V1 .2 and OS-65D . 

K>CA9 PARALLEL PORT $175 

Centronics Standard Parallel printer interface tor OSI computers. The card comes com- 
plete with 10 ft. of flat ribbon cable. Compatible with OS-65D and OS-65U software. 
tO-CAflD DIABLO PARALLEL PORT J175 

DIABLO 12 BIT WORD Parallel port for use with word processor type printers. Complete 
with 10 ft. cable. Compatible with OS-65U software. 

IO-LEVEL 3 MULTIUSER EXPANSION $450 

Provides 3 printer interfaces currently supported by OSI Serial, Centronics Parallel. 
Diablo Parallel. 4K of memory at DOOO for Multi-user executive. 4 Port serial cluster. The 
LEVEL 3 card allows expansion of an OSI C3 machine up to 4 users with appropriate ad- 
ditional memory partitions. 

24MEMCM9...$3M 1&MEM-CM9.. . WOO SMEM-CM9...S210 

24K memory card is available at 3 different populated levels. All cards are fufly socketed 
for 24K of memory. Tbe card uses 21 14-300ns chips. DIP SWITCH addressing la provided 
in the form of one 16K block and one 8K Clock. Also supports DIP SWITCH memory parti- 
tion addressing for use in multi-user systems. 

FL470 FLOPPY DISK CONTROLLER $1 B0 

OSI-Type floppy disk controller and real time clock. Will Support 5Y* ' or8", Single or 
double-sided drives. Requires drives with separated data and dock outputs, 
BKM600 BARE 10 CARD $50 

Super 1/0 Card. Supports 8K of 21 14 memory in two DIPSWITCH addressable 4K blocks, 
2 16 Bit Parallel Ports may be used as printer interfaces, 5 RS-232 Serial Ports with CTS & 
RTS handshaking. With manual and Molex connectors. 

BMEM-CM9BARE MEMORY CARD $50 

Bare 24K memory card, also supports OSI-type real time clock and floppy disk control tor. 
With manual and Molex connectors. 

•96 PROTOTYPE CARD $35 

Prototype board holds 96 14 or 16 pin IC's. Will also accommodate 18, 24, or 40 pin IC's. 
Row and column zone markings, easy layout. % t " epoxy glass PC. board. 
C1P-EXP EXPANSION INTERFACE $05 

Expansion for C1 P600 or 610 boards to the OSI 48 Pin Buss. Uses expansion socket and 
interface circuitry to expand to 48 Pin Backplane. Requires one slot in backplane. 
BP-580 BACKPLANE $47 

Assembled 8-slot backplane with male Molex connectors and termination resistors. 
DSK-SW DISK SWITCH $20 

A circuit when added to OSI Minifloppy systems extends the life of drives and media. Ac- 
complish this by shutting off Minifloppy Spindle motor when system is not accessing 
the drive. Complete KIT and manual. 

PW-^8 POWER SUPPLY $20 

Power One brand supply 5V - 6 amps with overvoltage protection. Reg. $49.95. 

D&N MICRO 

INC. 

3684 N. Wells Street Ft. Wayne, Indiana 46808 
219/485-6414 

TERMS: Check or money order Add $2 Shipping Outside U.S. add 10%. 



Olympic 
Sales 

A SERVING YOU SINCE 1947 

Company 

Main Showroom & Offices: , j_ 

216 South Oxford Avenue visa 

Los Angeles. CA 90004 _^_ 

WE HONOR MM 

VISA and MASTERCHARGE WW 



TELEX: 67 34 77 

ORDER DESKS open 7 Days a Week! 

7:00 AM to 7:00 PM Mon thru Sat 

Sunday Noon to 5:00 PM 

Order Desks: (213)739-1130 

TOLL-FREE TOLL-FREE 

(outside Calif.) (within Calif.) 

800-4218045 800-252-2153 



NO ONE UNDERSELLS OLYMPIC SALES 
Write & request our new 112 pcj catalog- 
please include $1 .00 to defray postage & 
handling-includes many more itemsfrom 
TV's to Watches! 



All goods subject to availability: tfiit ad super- 
sedes all previous ads; we arc not responsible 
for typographical errors; we will meet Or beat 
any advct i ted prices if the competition has 
the goods on hand. 

Minimum shipping and handling $4 95. 
All orders subject to verification and acceptance. 



tcippkz 



We are an authorized servicmo Apple dealer lor Apple II ft III 
Immediate delii-eiy an ill models -we carry in enormous mrtnloiy 
ol Apple ptoducti « all times' 

W^f\m^*m\m i^apvtf" Immediate delivery 

Wl I IIJUlMri6K-32K-48K-64K-Plus or Integer in stock! 
uce.mv.nto.yai: N™. IMPROVED APPLE III 128K VERSION 

DiiE with eoniioller 00S 3.3 ATTENTION: Immediate dtlrvtty 

Second Ouk Diivei tt£ ALSO CARRY SOFTWARE 

Piscal-Fortran-Cobol languages Perianal Software 

Oow Jonet & Quote reporter Peach Tree Software 

Graphics Tabled Microtalt 

Visicatc loi Apple II ft III Micropro 

Smarteim 80 column card Innovattve 

Micromodem II by DC Haves flm " ia J 

and more. . . System Plus 




E9 



Your Cost: 
S1 14.95 

Your Cost: 
$129.95 

Reuii Yow Cost 
W50 00 3195.00 



HEWLETT PACKARD 

2 NEW DELUXE CALCS FROM HP) 
Slim, shirt-pocket styling 

NEW! HP-11C 

Advanced Programmable 
Scientific LCO ««*/ S 13000 

NEW! HM2C 

Advanced Programmable 

Financial LCO Rewl StSOOO 
HP-125 New Microcomputer 

64K CPU/Tetmrnal/Keyboifd 
HP-85 Micr ocom pule ( -built- in printer /mom tor 

3250.00 2499.00 
HP 83 Microcomputer-boilt in monitor 2250 00 1799.00 
HP 2631 B Printer, dot mux laik lor optm) 3950 00 3199.00 
HP82905A 80 col printer, dot matrix 945.00 75508 

HP260I A letlei quality piMr.diny wheel 3495.00 

HP 82901M Dual mailer (256KB disk drive) 2500.00 1999.00 
Call us for the lowest prices on 7 disk drives Call us Call us 

HP 41 CV New' 2 2K bytes ol memory 325.00 256.00 

Card Reader for 41 CV 21500 171.00 

Piinleifor41CV 385 00 294.00 

Quad Ram 95.00 84.95 

Optical Wand lor 41 CV 125.00 99.95 

HP 41 C Calculator 25000 188.95 

Memory mod lor 41 C 26 95 

HP 97 Piosrmble punter ?50 00 579 95 

HP 34CPro 9 imbte scientific 15000 11795 

HP 38C Progrmblt business R/E 150 00 119 95 

We have the complete line of accessories, etc. 



XEROX 

Model 820 1 (5*1 I" S37S0 00 

64K COMPUTER & WORD PROCESSOR 

AS LOW AS *ee«*/ discount .,.< :,■■■■■ to 

S2995.00 



NEW-FAMOUS C0RVUS DISK ORIVES-5. 10, 20 
MEGABYTES with fantastic new 0MNINET Network 
Call ut for the best prices in the USA 1 System 




Texas Instruments 

iX™'^^. ,fame compute* 

Tl 99/44 U/l care S moie' 



SiwREYBOABO 



S950 00 $36935 




10" coloi mon.toi In. 99/4 
3?K l.o mem module 

Fxtended Bine. iMUSTIoi 

3?K module 
Speech lynthewei ISO 00 

We emt j luge mvenlcy ol tohviiie 



30-2 LCS Slu Slide NEW 18.95 
Tl 36SPLCO SCItMlf IC 22.50 



PRINTERS 

• DIA8L0 (letter Quality) 
630 R102bi-directnal/tractors 
1 640K 1 09 keyboard , tractors 

630 R0 Receive only 

1650K 1 36 keyboard/tractors 

• CENrRONICSdotmat.il. - 
100 9 Parallel, heavy duty 
704 9 Serial, heavy duly 

737 I Parallel 
737 3 Serial 
704 II Parallel 
P I Electrostatic 

• PAPER TIGER 



460G guphi 

560 

S60G qraphi 

US 

44SG 

EPSON PRINTERS 
■KM 

Optional Guttm Chip 60 
MX80 FT 

MX80.GRAFTHAX80 
MX80 FT • GRAFTRAX 80 
MXI80 



Retail Your Cost 
2966 00 2699.00 
3072.00 289995 
2710 00 2499.95 
3220 00 2999 95 



146000 119995 
179500 159995 

99500 799.95 
104SQ0 899 95 
1870.00 1696.00 

496 00 189.95 



995.00 


89500 


1094 00 


969.95 


1295,08 


1099.00 


1394 00 


1195 00 


795.00 


69S.00 


894 00 


789 00 



Retail 
64500 

745.00 
69500 
J9600 

■195 DO 



Yom Coll 
539.95 
95.00 
659.95 
579.95 
689.95 
789.95 



Tl 40 LCOSci/NEW 
Tl 57 Proq Scientilic 
TIS8C 480 Step. Proo. 
Tl 59 960 Step. Pioq. 
PC 100C Piinl/Plot 
LCO Programmer/NEW 




» "ST A Hl'"^ mventoiy ol pciiphls. teem, etc. 

A I AK I Computer »-,.» »c ol . 

400 SPECIAL PRICE' 1SK 595 00 339 95 

No language inc.. opt'l bas-c. 54.9$ 

BOO 16K Computer 1080 00 759 95 

SPECIAL" 

ATARI 800 48K Co mputer 1250.00 869-9 5 



OHIO SCIENTIFIC 

C8PDF 48K Retail:$3495.00V/C:S31 95.00 

• Dual 8" Drives *E4 col « 32 line/culoi 

• .7 MIPS f AST' •Mini moiestnd leatuies 

Fortran & Pascal available 
Many other OSI product! -at discounted prices 



WE ALSO HAVE . . . 

• NOVATION Modems 

CAT 

DCAT 

APPLE CAT Direct conned 



Retail Yout Cost 
199 95 159 95 
199 96 159.95 
349.95 31495 



SANYO MONITORS High resolution 

13" Color livevrl high Quality 560 00 419.95 

l2"Gieenphoiphoious 360 00 269.95 

12 Blact S nh.ir 340 00 239 95 

16" BlackS white 370 00 259.95 

9' Black Si "hue (the best selleil 235 00 169 95 

AMDEK(Leedex)High Quality Monitors 

100 12"8AV. I2MHI 179 00 139 95 

100 G 12" Green. 12 MHi 199 00 174 95 

300 G 12"Gie«n 18HHr 249.00 199.95 

Color I 13" Color. NTSC cpmp. input. 449.00 339.95 

audio amp & ipeakei 

Coloill 13" Color. RIG input. 999 00 699 95 

hi in oiaphics. speakei 



• HAZELTINE Video Display Terminals 

• SHUGART Disk Drives 

• DEC VTI00& VT103 

Call us lor your DISCOUNTED price TODAY' 



NEW From Tl-Senes 10 Personal Inlormatton Terminal Reied 995 00 Your Cost 795.00 
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Name: CONST 

System: North Star and Apple 
Memory: 32K minimum 
Language: BASIC 

Description: This program was written 
to do quantity and sizing take-offs for 
residential and small commercial struc- 
tures. To operate the program, the user 
has only to answer questions concerning 
room sizes and type of construction. 
Price: $75.00; listing $60. 

Includes diskette, on-line 
documentation, support. 
Author: David Lovejoy 

Available: Computing Interface 

1918 Carnegie Lane #C 
Redondo Beach, CA 
90278 

Name: BITPAK (for teachers) 

System: Apple II 
Memory: 48K 
Language: Applesoft 
Hardware: DOS 3.3/3.2; printer 

option 
Description: Consists of super 
decimals, long division with re- 
mainders, and Super Etch-A-Sketch. 
The first two are serious CAI programs 
for grades 1-9. Will do operations with 
decimals or whole numbers, and long 
division with remainders. You select 
the size of the numbers, not levels. 
Grades work, has traps, and field 
tested. The third program will sketch 
designs on the Lo-Res screen with save- 
to-disk option. Keyboard version, 
change colors, erase, X-Y coordinates 
displayed. 

Price: $24.00 

Author: [IAj:Calabrese 

Available: Bit'N Pieces Series 

P.O. Box 7035 

Eire, PA 16510 

Name: Net-Works 

System: Apple II or Apple II Plus 

Memory: 48K 

Hardware: 1 drive, DOS 3.3, 

Applesoft in ROM, D.C. 

Hayes Micromodem 
Description: Bulletin board and com- 
puterized message system for Apple II. 
Features speedy log-on, electronic mail 
with security provisions, downloading 
programs, editing, much more. May be 
used in conjunction with Computer 
Station's "Auto Modem" for establish- 
ing a business communication net- 
work, office to home message system, 



bulletin board service, etc. System 
operator has complete control of who 
uses the system. 
Price: $124.95 includes disk 

plus full documentation 

in sturdy 3-ring binder 
Available: Computer Station 

11610 Page Service Dr. 

St. Louis MO 63141 

(314) 432-7019 

Name: The Normalcy Life 

Dynamic 

System: Apple II 

Memory: 48K 
Language: Applesoft, Machine 
Hardware: Apple II Plus, Disk II 
Description: Do you think you want to 
be "normal"? Perhaps you don't! 
You'll see, after playing the games on 
this disk. In fact, your whole percep- 
tion of normality may change. This 
disk includes such games as The Mine 
Fields of Normalcy, Depth Charge!, 
Mystery Code, and Deep Sea Treasure, 
totally unique games that challenge 
beliefs as well as skills. Some of the 
best sound effects ever heard, Hi-Res. 
Price: $15.95 includes disk, 

game card 
Available: Avant-Garde Creations 

P.O. Box 30161 

Dept. MCC 

Eugene, OR 97403 



Name: Applied Educational 

Systems Grade Reporting 
System 

System: Apple II Plus using 

Microsoft Softcard 
Memory: 48K 
Language: Microsoft BASIC-80 with 

CP/M operating system 
Hardware: Apple n, Radio Shack 

Models I, II, and III and 

PET 
Description: The AES Grade Reporting 
System produces professional, full- 
sized report cards for schools of up to 
2500 students, and provides the follow- 
ing summary reports: honor rolls; rank 
in class listings; GPA listing; summary 
attendance list; class lists; failure and 
incomplete list; frequency distribution 
of grades by teacher, course, student 
year, and department; homeroom lists; 
permanent record labels,- and mailing 
labels. The system is menu driven and 
uses a low-cost, automatic mark sense 



card reader for data entry. 

Price: $2000 includes 

installation, one-day 
training session, 
operating manual 

Author: Robert C. Hamilton 

Available: Applied Educational 
Systems 
RFD 2, Box 213 
Dunbarton, NH 03301 

Name: VISI-CAIDS 

System: Apple II 
Memory: 32K 
Language: Applesoft 
Hardware: Printer, 1 or 2 disk 

drives 
Description: VISI-CAIDS is a compan- 
ion package of formatting aids for use 
with VisiCalc™ text files. The "Label 
Splitter" creates a new text file, com- 
patible with VisiCalc™, which divides 
wide label entries in a selected column 
into two or more narrower columns. 
The "Width Adjuster" prints 
VisiCalc™ data into variable width 
columns and can simulate a split 
screen on the printer. Also includes 
"Formula Reader" with special 
features and a "Print File Reader." 
Price: $34.95 includes one disk 

plus instructions 
Author: Charles Harrison 

Available: Data Security Concepts 

P.O. Box 31044 

DcsPeres, MO 63131 

(314) 965-5044 



Name: Space Adventure Pak 

System: Atari 400/800 

Memory: 16K cassette 

24K disk 
Language: BASIC 
Hardware: Joysticks and paddles 
Description: Space Adventure is an ar- 
cade game package that includes two 
action graphics and sound programs for 
the Atari. "Space Wars" is a high speed 
space battle between you and your 
Atari. "Shootout" is a cannon fight 
between you and your opponent. Uses 
player/missile graphics ability of your 
Atari computer system. Other software 
is available. Write for complete list. 
Price: $12.95 cassette ppd 

$15.95 disk ppd 
Author: Russell A. Grokett, fr. 

Available: Kinetic Designs 

401 Monument Rd. #171 

Jacksonville, FL 32211 

Name: CHAT 

System: Apple II or Apple II Plus 

Memory: 48K 

Language: Applesoft in ROM or 

Language Card 
Hardware: Hayes Micromodem, 

Disk II, printer optional 
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Software Catalog (continued) 
Description: CHAT is the communica- 
tions package that offers you the 
freedom and fun of simple conversa- 
tion. Save incoming data in a large 26K 
buffer. Edit, print, or store on disk what 
you save. Use the input anything line 
editor to create text files. Transfer or 
receive text files or BASIC programs to 
or from other computers. Features are: 
automatic log-on to networks, simple 
configuring to your system, character 
filter, non-keyboard characters, an- 
swering the phone — all clearly 
explained. 

$40.00 includes manual, 

four Applesoft programs, 

three text files and 

CHAT binary code on a 

diskette, DOS 3.3 

Robert W. Lovell 

LovelPs 

4205 Biltmorc 

Corpus Christi, TX 

78413 

(512) 852-3096 



Price: 



Author: 

Available: 



Name: 
System: 

Memory: 
Language: 



OSI BASIC Enhancer 

OSI OP/ 
Superboard/C4P 

8K 

Machine code w/BASIC- 

IN-ROM 



Hardware: C1P, Superboard, C4P 
Description: BASIC programmers who 
want real power over their awkward 
stock system will love this one. Get 
real delete action, replace cursor with 
one of your own choice (defaults to 
checkerboard square), commands to 
RENUMBER your programs to make 
them easy to read, AUTOSEQUENCER 
will save you from typing in line 
numbers, screen control to stop scroll- 
ing 1 key to running BASIC. LOAD and 
SAVE files with filenames on a token 
I/O system to reduce load-save times 
by 50%. Runs in approximately 1.5K of 
RAM. Send $1.00 for complete catalog. 
Price: $19.95 postpaid includes 

autoload, autorun 
cassette only, User's 
Manual and bug-free 
guarantee 
Author: Timothy W. Jackson 

Available: Computer Science 
Engineering 
57 Beals St. Rm. 57-12 
Brookline, MA 02146 



Name: Notewriter 

System: Apple II Plus 

Memory: 48K 

Language: Assembly, Applesoft 

Hardware: Soundchaser 3 Voice 



OSI Disk Users 

Double your disk storage capacity 
Without adding disk drives 

Now you can more than double your usable floppy 
disk storage capacity— for a fraction of the cost 
of additional disk drives. Modular Systems' 
DiskDoubler™ is a double-density adapter that 
doubles the storage capacity of each disk track. 
The DiskDoubler plugs directly into an OSI disk 
interface board. No changes to hardware or 
software are required. 

The DiskDoubler increases free user disk space 
from 50K to 120K for mini-floppies, from 201 K to 
420K for 8-inch floppies. With the DiskDoubler. 
each drive does the work of two. You can have 
more and larger programs, related files, and disk 
utilities on the same disk— for easier operation 
without constant disk changes. 

Your OSI system is an investment in computing 
power. Get the full value from the disk hardware 
and software that you already own. Just write to 
us, and we'll send you the full story on the 
DiskDoubler, along with the rest of our growing 
family of OSI-compatible products. 
IM DiskDoubler is a trademark of Modular Systems 

Modular Systems 

P.O. Box 16 A Oradell, NJ 07B49 
201-262-0093 






Synthesizer Card, Sound- 
chaser Music Keyboard 
and Interface Card 
Description: Notewriter is a unique 
program that transcribes music played 
live on the Music Keyboard to the 
monitor screen in real time. The score 
can then be edited in its entirety and 
printed out on a graphics printer. A 
click track is used to sync the music 
entry with the music notation to give 
accurate rhythmic representation. 
Price: $100.00 includes 

software and 
documentation 
Available: Passport Designs, Inc. 

785 Main Street, Suite E 
Half Moon Bay, CA 
94019 



Name: Falcons 

System: Apple II and Apple III 

Memory: 48K 

Language: BASIC 

Hardware: Apple II, Apple II PLus, 

Apple III 
Description: Invaders-style game with 
five levels of invading forces to be 
repelled. Very challenging and fast- 
paced. Succeeding games, if you get 
through a complete game, are more 
difficult. 




• AP101 

• AP102 

• AP103 

• AP104 

• AP105 

• RS201 

• RS202 

• RS204 

• RS205 

• AT301 

• P401 

• P402 

• P403 

• P404 

• CC90 



• AP103 



Apple II with Single Disk Drive $109 

Apple II with Double Disk Drives 119 

Apple II, 9 inch Monitor & Double Drives . . 129 

Apple ///, two additional Drives 8. Silentype 139 

1 2 inch monitor plus accessories 99 

TRS-80 Model I, Expansion Unit & Drives . . 109 

TRS-80 Monitor or TV set 84 

TRS-80 Model III 12 -( 

Radio Shack Color Computer 89 

Atari Computer & Accessories 109 

Paper Tiger 440/445/460 99 

Centronics 730/737 Line Printer II/IV 89 

Epson MX70 or MX80 89 

Epson MX100 99 

Matching Attache Case "5 

computer casQ company 

INDIAN MOUND CT COLUMBUS, OHIO 43213 (614) 868-9464 
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Software Catalog /continued) 



Price: 


$29.95 


Author: 


Eric Varsanyi and 




Thomas Ball 


Available: 


Piccadilly Software Inc. 




89 Summit Ave. 




Summit, NJ 07901 




(201] 277-1020 



Name: Kamakaze Education 

Pack 

System: OSI C1P 

Memory: 8K 
Language: BASIC 
Description: Four educational pro- 
grams in one. Send your men on a tank 
destroying mission by correctly 
answering a question from Spelling 
Drill, Addition Drill, Multiplication 
Drill, or Place Value Drill. 
Price: $15.00 

Author: Henry Svec 

Available: Henry Svec 

668 Sherene Terrace 
London, Ontario 
Canada N6H 3K1 



Name: 
System: 


Type 

SDOS or SDOS/MT 


Name: 
System: 


Memory: 
Hardware: 


48K minimum 
6800/6809 CPU with 
CRT, disk and printer 


Memory: 

Language: 

Hardware: 



Description: Type is a document- 
formatting program, used in word pro- 
cessing or document production. Com- 
mands embedded in raw text files pro- 
cessed by TYPE control the formatting 
of that text on the output device. Out- 
put formatting includes full justifica- 
tion, page width and depth, page 
numbering, centering, spacing, titles 
and table of contents generation. Type 
is used in conjunction with the SD 
Screen Editor for easy data entry. 



Soft Pretzels for OSI 

All OSI cassette-based 

systems 

8K 

OSI BASIC 

Standard systems 

(cassette only!) 
Description: High speed, real time, ac- 
tion arcade games including "Human- 
oid Defender," "Lunar Rescuer," 
"Rebel Gunner," "Spiderfood," "Ram- 
paging Robots" and many more! All in- 
clude color and sound at no extra cost. 
Sound for C1P is fully supported! In- 
struction sheet for installing sound on 
C1P available. Educational programs 
also available. 



Price: 



Price: 


$140.00 includes Type 
Program, 100-page 
manual 




Author: 


AMS 




Available: 


Software Dynamics, 






(exclusively) 


Author: 




211 W. Crescent Suite G 


Available: 




Anaheim, CA 92801 






(714) 635-4761 





$1.00 for photo- 
illustrated catalog, 
includes $1.50 credit on 
first order. Color and 
sound for C4Ps, sound 
for all CIPs. 
Bob Retelle, et. al. 
Pretzelland Software 
2005 Whittaker Rd. 
Ypsilanti, MI 48197 

JMCRO 
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FORTH 



• adheres to the FORTH-79 STANDARD 

• performs FLOATING POINT MATH 

• contains a 6502 MACRO ASSEMBLER 

• handles STRINGS much like BASIC 

• includes VIRTUAL MEMORY MANAGER 

• is ROMABLE 

• costs under S100 

• is available for KIM-1. AIM 65 and SYM-1 

• comes with complete SOURCE LISTING 

• manual has extensive FORTH TUTORIAL 

For more information and an ordering form 

contact: Eric C. Rehnke 

1067 Jadestone Lane 
Corona, CA 91720 
(714) 371-4548 



Engineering Micro-Software Center 
Design Software for Micro-Computers 

Apple 1 1 & HI 



Vibration Analysis 
Structural Loads and Stress 
General Mechanical Design 



104 E. Queenwood, Suite 2 
Morton, Illinois 61550 
309-263/2602 



Software for Engineers by Engineers 

I. Truss & Linkage Analysis 2D & 3D $75 

II. Beam Analysis w/Multi-Loads (diagrams) $75 

III. Rubber Element Design Shear & Compression $75 

IV. Torsional System Vibration $100 
Holzer Analysis (Branching & Gearing) 

V. Linear Vibration Systems-6 Degree of Freedom Mass $75 

Excellent for Mounting System Response 

VI. Bolted Joint Analysis $50 

VII- Fourier Analysis w/Data Display $35 

VIII. Column Design/Minimum Moment of Inertia Calc $60 

IX. Four-Bar Linkage — Generates Coupler Point Path $60 

Motion Synthesis for Mechanisms 
X. Weibull Failure Analysis — Considers both $60 

Failures and Suspensions w/Printer Plot 
XI. CPM-Critical Path Method of Project Management $60 
Very General — 500 Activities Max 

All Software is Well Prompted 

Many Others Under Development Now 

by our Professional Staff 
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GET 120% VALUE FOR YOUR 

PROGRAM PURCHASING DOLLAR 

WITH 



te ©MA to@^ra 

MORE THAN JUST A DATABASE 

Version 2 of the versatile Modifiable Database 



/ 




DATA PLOT 
& ANALYSIS 



Data may be plotted in a variety 
of formats such as scatter graphs. 
line graphs, bar charts, and pie 
charts- 
Ranges, minimums, maximums, 
means, standard deviations, cor- 
relation coefficients, etc. of any 
number of data files can be 
calculated 



REPORT GENERATOR 





O 
Ol/ 



POWERFUL 
DATA MANAGER 



• Versatile, user definable database can store 

data segmented by up to 35 fields. 

* User oriented format is easy for the novice 
or professional to utilize. The use of menus, 

extensive prompting, single keystroke com- 
mands, and a universal escape capability allow 
anyone to store or retrieve information in 
seconds without errors. 
• Machine language searches and sorts operate 
in a fraction of the time required by other 
programs. 

• Searches or sorts, subtotals or totals may 
be performed on any field at any time, not 

just on those that are indexed or specified in 

advance. 

* Search results may be displayed, printed, 
deleted, counted, totalled, edited, and/or 

saved to a new data file. 



OTHER FEATURES 




• The sophisticated report generator allows 
you to format your data output in an infinite 
variety of ways. 

You can print form letters, columnar 
reports, lists, mailing labels, etc. 
' Data, ratios or the results of calculations 
can be embedded anywhere in your letters or 
reports. 

The report generator gives your output the 
professional appearance that you require. 



SYNERGISTIC SOFTWARE 



ORDER YOURS TODAY! 



Floppy Drive version $220.00 — Hard Drive version $220.00 

Available from your local dealer or send check or money order to Synergistic Soft- 
ware, 5221 120 Avenue S.E.. Bellevue, Washington 98006 or phone 206-226-3216. 

Washington residents add 5.4% sales tax. 
Apple is a trademark of Apple Computer. Inc. 



• HARD DISK DRIVE COMPATIBILITY 
with hard drive version, works with Corvus 

and other hard drives. 
" Works with all Floppy drives with slot, 
drive and volume selection. 
" You can append or merge up to a full disk 
of data files, or segment your data into sep- 
arate files by a search key. 

• Searches can contain up to 10 levels. You can 
search for a key word in any field, the absence 

of a keyword, or a number being within a 

specified range. 

■ Global editing of data may be performed. 

" Arithmetic processing can be performed 

during record entry, edit, or output. 

• Record entry, edit, or deletion (individual 
records or blocks) can be performed with no 

tedious delays waiting for disk accesses, index 
file updates, etc. 

• Data may be stored on any number of floppy 

or hard disk drives. 

• Data files can be reformatted at any time 

without reentering the data. 

• With $5.00 Registration Fee receive one 

backup disk. 

• The package requires an Apple II plus or 
Apple II with Applesoft firmware. 48K RAM. 

at least one disk drive, and DOS 3.3. 
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11 SYM-1 



-1/KTM-2 Enclosure 




ENCLOSURE FEATURES: 

• Low PfOlile Design; 18.5 in. WiQex 16 
m. Deepxa.5in. High 

• .060 Aluminum • Durable Charcoal 
Texture Finish • Walnut Finished Side 
Panels 9 Hinged Top • Rear Panel. 
Power & I/O • Simple Assembly & 
Instructions 



ENCLOSURE INCLUDES: 

• Keypad Access Cover • Rubber 
Feet • Fuse and Fuse Holder • Powei 
On Switch • Terminal Strip • AC Oullet 



MOUNTING PROVISIONS FOR: 

• SYM-1/KTM-2 • Add-on Memory 
Board • Cooling Fan • (2) DB25 
Connectors (RS 232) • Video Jack 



$95.00 »'"*"""""" 



612-633-3035 

KEN-WAY PRODUCTS 83lP.iltonTM..Ne»8nghlon. Mmnesola 551 1 2 




BETA 32K B.YTE EXPANDABLE RAM FOR 

6502 AND 6800 SYSTEMS 

AIM 65 KIM SYM PET S44-BUS 

• Plug compatible with the AIM-657SYM expan 
sion connector by using a right angle connec- 
tor (supplied). 

• Memory board edge connector plugs into the 
6800 S44 bus. 

• Connects to PET using an adaptor cable. 

• Uses +5V only, supplied from the host com- 
puter. 

• Full documentation. Assembled and tested 
boards are guaranteed for one full sear. 
Purchase price is fully refundable if board is 
returned undamaged within 14 days. 

Assembled with 32K RAM $349.00 

& Tested with 16K RAM 329.00 

Bare board, manual St hard-to-gel parts. . . 99.00 
PET interface kit. Connects the 32K RAM board 
toa4Kor8KPET $ 69.00 

See our full-page ad in 
BYTE and INTERFACE AGE 



wabasK 



PROGRAMMER 



PROGRAMMER is a newsletter 
that offers tips on software 
technique and invaluable 
marketing information. 






You'll learn who 
is selling 
software and 
who isn't. 

What markets 

are hot and what 

markets are dead. 

Industry features keep you informed 

about your rights as a freelancer. 



Don't be without it! 

SEND CHECK OR MONEY ORDER TO: 



PROGRAMMER 
P.O. BOX 3210 
MANCHESTER. N.H. 03105 



NAME: . 



ADDRESS:. 
CITY: 



.STATE;, 



D CHECK BOX FOR SAMPLE ISSUE-S2.00 




8" or 5'/«" flexible diskettes certified lOOTo error 
free wilh manufacturer's 5-year limited warranty 
on all 8" media. Soft-sectored in boxes of 10. 
5 1 /." available in 10-secior. 
(Add $3.00 for plastic library cases) 

8" single sided, single density $27.50 

8" single sided, double density 35.50 

8" double sided, double density 45.50 

5'/4" single sided, single density 27.50 

BW: single sided, double density 29.50 

5V« "single sided, double density. 10-sector$ 29.50 

TERMS: Minimum order $15.00. Minimum ship- 
ping and handling $3.00. Calif, residents add 6"o 
sales lax. Cash, checks, Mastercard. Visa and pur- 
chase orders from qualified firms are accepted. 
(Please allow two weeks for personal checks to 
clear before shipment.) Product availability and 
pricing subject to change without notice. 
INTERNATIONAL ORDERS: Add 15 V lit pur- 
chase price for all orders. Minimum shipping 
charge b $20.00. Orders wilh insufficient funds 
icill he delayed. Excess funds will he returned 
u ilh your order. All prices are U.S. only. 



PAPER TIGER 
PRINTERS 

IDS460G9x9 Dot Matrix Printer $890.00 

IDS 560G Wide Carriage Printer 1099.00 

TERMINALS 

ADDS Viewpoint $569 00 

IclcVidco9IO 579.00 

TeleVideo9l2C 679.00 

TeleVideo 920C '29.00 

TelcVidco 950 929.00 

8" DISK DRIVES 

Shugarl 80IR $399.00 

NEC FD1160 (double sided) 569.00 

DYNAMIC RAMS 



41 16 1200ns) . . . 
4164 (64Kxl) . . 



scl of 8 . . 



$24.00 
$18.00 



COfTPUTER DEVICES 

I230 W.COUMS AVE. 

ORAAGE. CA 99668 

(714)633-7980 
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Hardware Catalog 



Name: RS-232 DB-25 Pin 

Reconfiguration Adapter 

Description: Printed circuit card with 
one male and one female DB25 connec- 
tor mounted on it and incorporating a 
special "matrix switch." This device 
enables users to instantly mate almost 
any serial I/O device to any computer 
by rerouting RS-232C signals. 
Price: $59.95 

Available: Mountain Computer Inc. 
300 El Pueblo Rd. 
Scotts Valley, CA 95066 
(or local Apple dealers! 

Name: 16K RamBoard 

System: Apple II or Apple II Plus 

Memory: 16K Dynamic RamBoard 
Description: A 16K RamBoard that ex- 
pands an Apple II or Apple II Plus 48K 
to 64K. The RamBoard is compatible 
with all Apple II languages and soft- 
ware. It enhances operations by allow- 
ing larger languages, data bases and pro- 
grams. It also greatly improves the 
capability of CP/M, Pascal, Fortran 
and Cobol. 
Price: $129.95 introductory 

offer includes RamBoard 
and complete installation 
and operating instructions 
Available: ConComp Industries 
8338 Center Drive 
La Mesa, CA 92041 
(714) 464-8715 

Name: MFD Mini-Disk Systems 

System: AIM 65, KIM, SYM 

Language: DOS supports AIM 
monitor, Assembler, 
BASIC and PL/ 65 
Hardware: Controller, Drive(s), 

Cable 
Description: Mini-Disk storage system 
including DOS, drive controller, cable 
and user's manual for AIM 65, KIM and 
SYM computers. Controller available 
for either the AIM expansion bus or for 
the SS-50 bus. AIM-to-SS-50 mother- 
board adapter available. 
Price: Mini-Disk Systems from 

$599.95, Adapter 
(M-65/50) is $89.95. 
Available: Percom Data Co., Inc. 
11220 PagemillRd. 
Dallas, TX 75243 
(214) 340-7081 
(and authorized Percom 
dealers) 



Name: The DOS Switch 

System: Apple II, Apple II Plus 
Description: Allows a DOS 3.3 equipped 
Apple II system to boot DOS 3.2 or 
DOS 3.3 diskettes simply by flipping 
The DOS Switch. You can conveniently 
use your valuable copy-protected/ 
unMUFFINable DOS 3.2 software, 
without the BASICs diskette. Easy to 
install and use. Two models: DS-1 
(uses your P5 and P5A PROMs), and 
DS-2 (3.2 boot PROM installed). 
Price: Model DS-1 $29.95 

Model DS-2 $44.95 
Available: Computer Micro Works, 
Inc. 
P.O. Box 33651 
Dayton, Ohio 45433 
(or Apple dealers) 

Name: Dithertizer II 

System: Apple II 
Memory: 48K 

Language: Applesoft and Assembler 
Hardware: Board 

Description: Package consists of board, 
Sanyo VC 1610X camera, and cables. 
Also included is software for image 
contouring. The Dithertizer converts 
input into dithered images which pro- 
duce the appearance of gray scales on 
the Apple II screen. Pictures may be 
saved to disk and the number of scan 
levels may be increased. 
Price: $656.00 includes S&H 

Available: Peripherals Plus 

39 E. Hanover Ave. 

Morris Plains, NJ 07950 

Name: GMS 6519 Floppy/Printer 

Controller 

System: 6500/6800 
Hardware: 6" x 9.75" module 
Description: Controls two 5 Vt" floppy 
disk drives and a printer, with eight 
programmable I/O lines, 1 MHz or 2 
MHz operation, base address and 
enable/disable switches, over voltage 
and reverse polarity protection. Op- 
tional 4K operating system, optional 
6K 6502 assembler, both compatible 
with System 6T. Can drive floppies 
such as Shugart, Teac, Pertec; printer 
such as Centronics. 
Price: $246.00, single piece qty. 

Available: General Micro Systems 

1320 Chaffey Ct. 

Ontario, CA 91762 

(714) 621-7532 



Name: Andromeda ROM Board 

System: Apple II 
Memory: Any 

Description: The Andromeda ROM 
board permits you to plug many utility 
programs into your Apple II and access 
them instantly without loading them 
from disk. You can install 2K PROMS, 
4K PROMS, or even 2K RAM chips in 
each of 2 memory sockets. Comes with 
a utility ROM with five built-in op- 
tions to apply to your Applesoft pro- 
grams: automatic line numbering, list 
control, DOS expunge, alphabetize 
disk catalog, and restore a crashed pro- 
gram. Many more PROMS are available. 
Price: $125.00 

Available: Computer Data Services 
P.O. Box 696 
Amherst, NH 03031 
(603) 673-7375 

Name: The Findex 

Microcomputer 

Memory: BASIC configuration is 
80K of RAM, expandable 
to 2 million characters 
Language: Supports Business 

BASIC, Cobol, Fortran, 
Pascal, APL, PL-1 
Description: Combines memory, ex- 
panded keyboard, gas plasma display, 
disk drive and printer in a package no 
larger than most electric typewriters. 
This 31-lb. microcomputer system inter- 
faces to a variety of outside peripherals, 
like larger printers or multiple hard 
disk drives. Also available in applica- 
tions software packages for business, 
medical offices, etc. 
Price: $6,980 - $20,000, 

depending on peripherals 
Available: Findex 

20775 S. Western Ave. 
Torrance, CA 90501 

Name: ROM Simulator 

System: Apple II Development 

System 
Memory: 2K 

Hardware: Double-sided board 
Description: Double-sided, gold-plated 
board for developing software from 
host computer (Apple) to target com- 
puter (usually SUPERKIM in Lamar In- 
struments Developent System) to be 
placed in the ROM. Reduces time re- 
quired to program. Can be used to in- 
crease RAM available in Apple. 
Price: $295.00 

Available: Lamar Instruments 

2107 Artesia Blvd. 

Redondo Beach, CA 

90278 

(213) 374-1673 
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16K Apple II, No I/O Slots: $900.00 



Would you even consider purchasing an Apple II that 
cannot be expanded, even though you would save $200.00? 
Of course not! An Apple that can't be expanded is wor- 
thless. So why would anyone want to buy a lower case 
adapter that can't be expanded to meet the changing needs 
of all Apple owners? 

Rather than design our product as one monolithic item 
that you buy once and pray it doesn't become obsoleted, 
Lazer Microsystems offers a modular system with power to 
grow a complete set of integrated components that can be 
purchased as needed. You don't need to lay out a large sum 
of money all at once, nor do you have to pay for un- 
necessary features to get the features you do want. And 
you won't have to throw anything away should you decide 
to upqrade tomorrow. The choice is yours: do you want to 
take a chance with a system that costs a few dollars less, 
or do you want to purchase the state-of-the-art system that 
can be expanded to meet all of tomorrow's needs? 

Start with our field-proven Lower Case + Plus. At $64.95 
it offers twice the features found on any other lower case 
adapter. Software on diskette, inverse-only mode, two on- 
board character sets (word processing and graphics), ex- 
cellent documentation, and our exclusive "expansion 
socket" - your key to the future. Not all lower case 
adapters were created equal, ours was created better! 




GRAPHICS * LOWER CASE CHARACTER GENERATOR 
FOR THE APPLE II COMPUTER 
Some of the features of our system include: 

1) Our system is completely compatable with any piece ot software that will 
work with the "Dan Paymar Lower Case Adapter. ' 

2)Our system works with every word processor we' 
ve seen for the Apple II including EasyWriter and unmodified Applewriters. In 
fact, Lazer's lower case system works with more word processors than anyone 
else's. 

3) Our hardware works fine with all printers and 80-column boards. 

4) You CAN order a Lower Case i Plus specifically prepared for your Apple. 

5) We offer a one-year limited warranty on our board. 

61 Our board is easily installed. Most beginners can install it within twenty 
minutes. 

71 The lower case system is fully transparent to your Apple. The Lazer system 
does not use up any of the Apple's available RAM, nor does it slow the opera- 
tion of your computer down in any way. In fact in some instances our equip- 
ment speeds up existing programs! 

81 Lazer Microsystems' hardware products were designed by Randy Hyde. Ran- 
dy. as a hardware and software engineer, has been designing products for the 
Apple II since 1977 With four years of experience behind our products, you can 
be well assured that Lazer's components are well integrated into the Apple 
system and you will encounter few difficulties using the Lazer lower case 
system with any software available tor the Apple II. 

9) Lazer Microsystems. Inc., is a real live corporation operating out of real of- 
fices in Southern California. Most manufacturers of lower case equipment 
operate out of their bedroom. Who do you think will be around in two years to 
support their product? 




& SHIFT KEY UPPER/LOWER CASE CONTROL 

Next add our Keyboard + Plus. The Keyboard + Plus 
turns your Apple's uppercase only keyboard into a profes- 
sional 128-ASCII character keyboard. The Keyboard + Plus 
also features a 64-byte type-ahead buffer that drastically 
improves the performance of existing programs, lazer s buf- 
fer can be cleared or disabled if desired. 

MORE PRODUCTS FROM LAZER 

Character Set + Plus: Add two more ROM-based character 
sets to your Lower Case + Plus! With the CS+ you have a 
total of four character sets on-board. Choose from any of 
the 25 fonts provided on the Lower Case + Plus disk, or 
create your own. Only $24.95. 

Double Vision + Plus: At last! Good lower case display for 
Computer Stop's Double Vision Board. In addition to the im- 
proved display, our DV + gives you two on-board character 
set (std and graphics) as well as our famous expansion 
socket that lets you add our Character Set + Plus and 
Graphics + Plus peripherals. Only $39.95. 

Lower Case + Plus II: for the budget minded Apple owner. A 
low-cost chip that replaces the character generator ROM 
on revision seven and later Apple motherboards For $29.95 
you qet the Lower Case +Plus II, Pascal and BASIC soft- 
ware on diskette, and complete installation instructions. 
The Lower Case + Plus II is not expandable like our Lower 
Case + Plus but we do offer a $20.00 trade-in allowance if 
you decide to upgrade to a Lower Case + Plus in the 
Future. 




1791-G Capital 
Corona, CA 91720/ 
(714)735-1041 



INC. 



Ordering Information: 

Lazer Microsystems' products are available from reputable distributors, 
dealers, and mail order houses worldwide. If your local dealer cannot 
demonstrate our products for you. tell him he can get them from Computer 
Data Services, Micro-D, Softsel, Lazer Microsystems, and other distributors. It 
your dealer refuses to stock Lazer products, give Lazer, Hungtington Com- 
puting, or Consumer Computers a call -the product is always available off the 
shelf. 

Before you purchase anybody's lower case adapter, ask for a copy of our free 
booklet "Keyboard Enhancers/Butfers and Lower Case Adapters: From the In- 
side Out" it will explain all the advantages and disadvantages of installing 
lower case equipment in your Apple II. Or give us a call -we'd be more than hap- 
py to discuss our product line with you. 

Dan Paymar Lower Case Adapter TM Dan Paymar. 

Apple...TM Apple Computer Inc. 

Double Vision TM Computer Stop 

+ Plus TM Lazer Microsystems. 

Note: EasyWriter and unmodified AppleWriter usage requires optional ROM 
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Dr. William R. Dial 
438 Roslyn Avenue 
Akron, Ohio 44320 
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Barden, Frank, "Super-Text Patches for the MX-80," pg. 4. 

Combine the best qualities of this word processor with 

the versatile MX-80 and avoid having the control codes 

of each interfere with the other. 
Whittaker, Alec, "As BASIC as Possible," pg. 7. 

A short tutorial on fitting some simple routines 

together. 

1115. SoftSide 3, No. 6 (March, 1981) 

Patton, Garry J., "Screen Capture," pg. 19. 

A short routine for the Atari (with Apple translation) to 

print the screen to the printer. 
Voskuil, Jon, "Math Decathlon," pg. 21-25. 

An Applesoft listing of a game/tutorial in four parts. 
Pelczarski, Mark, "Developing Data Base," pg. 34-35, 57. 

Part 7 and the final chapter in this series on a Database 

for the Apple and Atari. 
Morris, W. and Cope, )., "Flags," pg. 45-46. 

An Atari program to display national flags on the 

screen. 
Steenson, David, "Strategy Strike," pg. 52-57. 

A game for the Apple II or TRS-80. 
Truckenbrod, Joan, "Three-Dimensional Rotation," 
pg. 66-67. 

A computer graphics tutorial for 6502 micros. 
Voth, Mitch, "Mini Golf," pg. 68-70. 

A game for the Apple. 
Various "Apple One Liners," pg. 70. 

Several one-line programs for the Apple. 
Johnson, Paul, "Atari Memory Upgrade," pg. 92-93. 

A hardware article on easy 8K to 16K conversion for the 

CX852 memory module in the Atari 800. 

1116. 73 Magazine No. 247 (April, 1981) 

Jensen, Carl, "Apples: Five Bits or Eight," pg. 66. 

Ham operation on 5-bit RTTY (Baudot) or 8-bit RTTY 
(ASCII) with the Apple II; hardware and software. 

1117. Compute! 3, No. 3, Issue 10 (March, 1981) 

Mansfield, Richard, "Taking the Plunge — Machine 
Language Programming for Beginners," pg. 20-25. 

A tutorial for PET users. 
Dejong, Marvin L., "Computer Communications Experi- 
ment," pg. 28-33. 

Hardware and machine language routine for a 6502-to- 

RS-232C to Modem interface. 
Sander, Louis F., "Getting the Most from Your PET 
Cassette Deck," pg. 42-46. 

How to insure the reliability of your cassette for the 

PET. 
Albrecht, Bob and Firedrake, George, "The Mysterious 
and Unpredictable RND," pg. 4852. 

Part 3 of several installments for PET users. 
Oakes, Peter, "A CAI Program Called Linear Equation," 
pg. 54-59. 

A computer assisted instruction (CAI) math program 

for the PET. 



Clarke, Jack, "HEX Conversion," pg. 60-61. 

Using the 6502's Decimal Mode — a tutorial. 
Ostrowsky, Sherm, "Clearing the Apple II Low- 
Resolution Graphics Screen," pg. 6266. 

Fast screen clear techniques for the Apple. 
Mauney, Gene A., "Fun with Apple and Pascal," pg. 68-70. 

Help for the user of Apple/Pascal. 
Patchett, Craig, "Designing Your Own Atari Character 
Sets," pg. 72-77. 

A tutorial for Atari users. 
Gropper, D.M., "Atari BASIC — A Line Renumbering 
Utility," pg. 78. 

A short program for the Atari. 
Baker, Robert W., "Atari Memory Dump and Dis- 
assembler," pg. 80-84. 

A handy utility program which allows you to examine 

RAM or ROM memory with either a dump or dis- 
assembly listing. 
Wrobel, Joseph J., "Formatted Output for Atari BASIC," 
pg. 84-85. 

A utility to simulate 'print using' and TAB functions on 

the Atari. 
Howell, R.A., "Random Color Switching While Idle," 
pg. 85-86. 

A routine for the Atari. 
Berger, Tom R., "A Small Operating System: OS65D The 
Kernel," pg. 87-88. 

Part 3 of three installments on an operating system for 

OSI micros. 
Stanford, Charles L., "A Six-Gun Shootout Game for the 
OSI C1P," pg. 88-91. 

A game for the OSI micros. 
Brandon, Eric, "Keyprint Revisited," pg. 92-94. 

Here is a KEYPRINT routine for 'old ROM' PETs. 
Butterfield, Jim, "Learning About Garbage Collection," 
pg. 96-100. 

Reclaiming memory on the PET. 
Fremont, David Malmberg, "PET Machine Language 
Graphics," pg. 102-110. 

A tutorial on PET graphics. 
Campbell, Gordon, "PET Exec Hello," pg. 124-128. 

A trilogy of small programs which allows you to use a 

'Hello' file on disk. 
Busdiecker, Roy, "Universal Tape Append for PET/ 
CBM," pg. 132-137. 

How to combine programs on CBM systems. 
Clements, William C, Jr., "A Vocal Hex Dump for the 
KIM-1," pg. 146-149. 

A program for the KIM-1 and an inexpensive speech 

synthesis unit. 
Chamberlin, Hal, "Expanding the KIM-Style 6502 Single 
Board Computers: The Modified KIM Bus," pg. 150. 

Part 3 of three articles on a modified bus. 

1118. Interface Age 6, Issue 4 (April, 1981) 

Moore, Herb, "Sounds of the Atari — In BASIC," 
pg. 50-54. 

Part 2 on color graphics for the Atari. 
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NIKROM TECHNICAL PRODUCTS PRESENTS 

A DIAGNOSTIC PACKAGE FOR THE APPLE II 

AND APPLE II + COMPUTER. 

"THE BRAIN SURGEON" 

Apple Computer Co has provided you with the best equipment available to date. The 
Diaonostic's Package was designed lo check every major area of your computer, detect errors, 
and report any malfunctions. Tha Brain Surgeon will put your system ihrough exhaustive, 
thorough procedures, testing and reporting all findings. 



The Tests lnclu<Je. 

• MOTHERBOARD ROM TEST 

• APPLESOFT ROM CARD TEST 

• INTEGER ROM CARD TEST 

• MOTHERBOARD RAM TESTS 

• DISK DRIVE SPEED CALIBRATION 

• DISK DRIVE MAINTENANCE 

• DC HAVES MICROMOOEM II TEST 

(HARDWARE & EPROM) 
■ MONITOR * MODULATOR ROUTINES 

• MONITOR SKEWING TESTS 
- MONITOR TEST PATTERN 

• MONITOR TEXT PAGE TEST 



. MONITOR & TV YOKE ALIGNMENT 

• LORES COLOR TESTS 
. HI RESCOLOR TESTS 

• RANDOM HIRES GENERATOR 

• SPEAKER FUNCTION TESTS 

• SQUARE WAVE MODULATION 

• PADDLE & SPEAKER TEST 

• PADOLE & BUTTON TEST 
- PADOLE STABILITY 

• INTERNAL MAINTENANCE 

• GENERAL MAINTENANCE 

• ON BOARD "HELP" 



Tha Brain Surgeon allows you to be confident o! your system. This is as critical as the 
operating system itself You must depend on your computer 100 V. of it's running lime The 
Brain Surgeon will monitor and help maintain absolute peak performance. 



Supplied on diskette wilft complete 
documentation and maintenance guide 

PRICE S49 9S 

REQUIRES: 48K, FP in ROM 

I Disk Of ive. DOS 3.2 W 3 3 



Nikrom Technical Products 

25 PROSPECT STREET • LEOMINSTER. MA 01453 

Call TollFraa Now! 

Master Cna'ge & VISA uSS'S call i 8COH2'>224fc 
Kansas Residents c 




\flHL 



FOR THE PET/CBM 



VIGIL Is an editing, new interactive lanomoe (or your PET/CBM. It's easy to 
-n and lets you quickly create oaves and graphics applications. 

• More tnan 60 powerful ca— Winds 'or manipulating oraphlcs figur 
' Double density oraphlcs give you 80 I SO plot positions 

• Larqc MtW displays, two timers ard tone (with e«t- speaker) 

• lOADtng and SAVEina of VIGIL programs to cassette o' diskette 

■ Htne complete programs Included - Breakout. Spacewar. AntiAircraf t. 
U.F.O., SpaeeBattfe. Concentration. Maie. Kaleidoscope * fortuneTell 

■ Comprehensive SO- paqe manual 

• For OLD. WW or 4.0 Poms 

u.S. I CANA04 rOPIICH 

VIGIL tor PIT/CBN on cassette or diskette «/9 programs S3* MO 

VIGIL User's Manual (refundable with software order) SIO 11? 

VIGIL Interpreter listing (650? Assembler Language) S2S 130 

PET MACHINE LANGUAGE GUIDE (OLD. HfU, pr 4.0 WHS) 59 Ill 




PET 4 APPLE II USERS TlNY PASCAL 

Ihe TINY Pascal System turns your PFI or APPll II into a P-maChlr* «i 
' LINE EDITOR - creates, modifies and maintains source language 
• COMPILER - produces P-code, the assembly language o* the P-mai 



INlERPBfTER - 



utes compiled P-code. features built-in TRACE. 



• STRUCTURED PROGRAMMING - (ASE-0*, WHIIE-DO. U -ImEN-ELSE . RtPEAT-OKTIl . 
f0R-I0/0OWHT0. KGIN-EMJ. PPOC. EUNC 

• Graphics version has more - GRAPHICS, PLOT, POINT. ICKT, I»ET. ARS. SOT. 
PET/CBM has double density plotting and APPLE I! has LORES and HIRES 
Ulth ROM Applesoft) - COLOR. HGRAPMCS. hcOLC*. MPLOT. POl and T0HE 

U.S. 1 CANADA FOREIGN 
TINT Pascal PLUS* GRAPHICS VERSION includes manual 

PET 32K HEH/4.0 ROMS diskette SM WO 

PET 32K Ntu/4.0 ROMS cassette - «S 165 

APPLE II 481 and DOS 3.2/3.3 "0 160 

TINT Pascal NOB GRAP H ICS VERSION inclmme* manual 

PET 16K/J2K NEN ROMS diskette *JS US 

PET I6K/32H NEW ROMS cassette "0 «° 

APPLE II 32* *nd DOS 3.2/3.3 135 I4S 

TINT Pascal User's Manual (refundable with software order) 110 112 

I1NT Pascal 6502 Interpreter Hsting-GPAPHICS version $25 130 

TINT Pascal 6502 Interpreter Listlng-tfW-GRAPMlCS version 115 120 

RET MACHINE LANGUAGE GUIDE *for OlO. NEW or 4.0 ROMS « Ill 




wsr 



IffWfXIXIXl l ABACUS SOFTWARE 

P. 0. Box 7211 

Grand Rapids, Michigan 49510 



illUMM 



B16/ 241-5510 



Prices include postage 

Ord- »st be prepaid via 
check, money order or bar* - 
card, foreign orders may be 
paid for via International 
money order or bankcard: 
( Access. Eurocard.Ba re laycard) 



Edelson, Roger H., "The Microsoft Z-80 SoftCard — 
CP/M forAP," pg. 60-63. 

A review of a card to expand the capabilities of the 

Apple. 

1119. Interactive Issue 4 (March, 1981) 

Caldwell, Sam, "Communications for the Handi- 
capped," pg. 3-7. 

Use of the AIM 65 with some minimal hardware and a 
simple basic program to assist the non-verbal handi- 
capped. 
Mcintosh, Bruce, "Assembly Offset," pg. 10-11. 

How to make the AIM 65 assembler offset object code 
for EPROMS. 
April, Georges, Emile, "AIM 65 Assembler OUTPUT 
Formatter," pg. 12-13. 

Output formatter and Centronics printer driver. 

Corder, Mike, "Solid Graph Plot," pg. 17-20. 

BASIC program and machine code for an AIM 65 plot 

routine. 
Shafer, Marvin D., "Improved Plot Routine," pg. 21-22. 

A utility for the AIM 65. 
April, Georges, Emile, "AIM 65 Monitor Bit Patterns," 
pg. 24. 

A table of use to AIM 65 users. 



1120. PEEK (65) 2, No. 3 (March, 1981) 

)ones, David A., "Cassette Corner," pg. 4-5. 

A cassette loader with checksum which is quite a bit 
shorter than the OSI autoload. 

Morris, E.D., Jr., "Improve Your Garbage Collection," 

pg. 6-7. 

Memory recovery for the OSI system; a permanent 
hardware solution to the problem. 

Holt, Ken, "Assembler Programmer's Guide to OSI 

Board Interfacing," pg. 12, 9-11. 

$30 board addressing, OSI 470 board, 470 board ad- 
dressing, OSI 500 board, 500 board addressing, OSI 
510 board, 510 board addressing. 

1121. KB Microcomputing 5, No. 4, Issue 52 (April, 1981) 

Baker, Robert W., "PET-Pourri," pg. 10-13. 
News on the VIC-20 Commodore color computer, 
new PET software, etc. 

Messent, Andrew N., "Save It with CASSY," pg. 38-41. 
A versatile machine-language program for the OSI 
C1P which saves any area of memory to the cassette 
recorder. 

Jones, Edward C, "Energize Those OSI Peripheral 

Ports," pg. 80-82. 

Hardware modification for the Challenger IP or OSI 
Superboard II to provide for a printer or modem. 

Peterson, Craig, "Apple Sector Counter Extra- 
ordinaire," pg. 113-114. 
An Apple utility to keep track of the free, unused sec- 
tors on the floppy disk. 

Blank, Jerry, "Hidden Features Exposed," pg. 156-157. 
Some unexpected capabilities of the Atari microcom- 
puters, including a hardware mod for upgrading the 
Atari 400 to 16K. 

Bradshaw, Cyril, "OSI Clear-Screen Command," pg. 
172-173. 

A disk modification which blanks the OSI screen in 

milli-seconds. 
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Hansen, Jim, "A Tale of Two Screen Dumps," pg. 
174-176. 
A utility for the Apple/Paper Tiger combination. 

1122. The Cider Press (January/February, 1981) 

Staff, "The Best of Cider Press, 1980." 
Over 100 pages of the best articles published in the 
Cider Press in 1980. 

1123. L.A.U.G.H.S. 3, No. 3 (March, 1981) 

Roe, David, "There is a Better Way — Machine 

Language Portion," pg. 3-4. 
Routines to locate screen array, store or display Hi- 
Res screen in that array, and to switch graphics on or 
off in the Apple. 

1124. The Apple-Dillo (March, 1981) 

Teas, George, "Pascal Primer," pg. 6-7. 

Notes on creating a UNIT and including it in the 
SYSTEM. LIBRARY. 

1125. The Cider Press (March, 1981) 

Hartley, Tim, "Changing Diskette Colume Numbers," 

Pg- 4. 
An aid for Apple disk users. 

Norris, Paul, "Pascal and the F8 Monitor ROM," pg. 11. 

Tips for the Apple Pascal user on accessing certain 

Apple ROM functions. 
Sugou, Shin'Ichirou, "Pascal Assembly — An Example 
Program." 

Utility routines for Apple Pascal users. 

1126. Byte 6, No. 4 (April, 1981) 

Minton, R.B., "A Graphic Execution Display," pg. 34. 
A program for the OSI Superboard to display graphic- 
ally how fast a program is running. 

Carlson, Edward H., "Challenger Writes on Comprint," 

pg. 310-312. 
A 6502 assembly language program that interfaces a 
6522 VIA parallel port on the OSI Challenger II with a 
COMPRINT 912 printer. 

1127. IEEE Transactions On Education, Vol. E-24, No. 1 
(February, 1981) 

Hanson, Donald F., "A Microprocessor Laboratory for 
Electrical Engineering Seniors," pg. 8-14. 

Instructional Apparatus including the AIM 65 micro- 
computer and an auxilliary educational interfacing 
unit is described. 

1128. Proc, 1981 Southeastern Section Annual Meeting, 
Amer. Soc. for Eng. Education, (April 5-7, 1981) 

Hanson, Donald F., "A Microprocessor Laboratory 
Course Based on an AIM 65 Solderless Interfacing 
Unit," pg. 1-7. 
A 6502-based educational tool for Electrical Engineer- 
ing students. 

1129. Sym-Physis 2, No. 1, Issue 7 (Jan/Feb/Mar, 1981) 

Anon., "A Bell for the KTM-2 and/or KTM-2/80," pg. 4. 
A bell function for the SYM-1. 

Anon., "Misc notes for SYM-1," pg. 4-6. 

Controlling I/O from BASIC; cassette problem and 

fix; wiggle your chips and flex your boards; the RAE 

user function; disk systems, etc. 
Anon., "A Deductive Story — Part I." 

All about BASIC and BAS-1 for the SYM-1. 



Dithertizer 




...thccyczoF 
apple: 
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Though it is very simple to use, the Dithertizer II represents 
the ultimate in video digitizing using the Apple II 
computer. The Dithertizer is an interface card which 
converts video input into digitized images. Because the 
Dithertizer II is a frame grabber. DMA type digitizer, It 
offers extreme high speed in the conversion process (it 
grabs an entire frame in 1/60th of a second). The camera 
supplied with the package is the Sanyo model VC1610X. 
Cabling is supplied for this camera so as to have the 
Dithertizer II system up and running in minutes. The video 
camera used for input must have external sync to allow 
for the frame grabber technology employed for digitizing. 
If a camera other than the model recommended is used, 
wiring adaptations by the user may be required. Software 
is supplied with the board to allow you to display up to 64 
pseudo grey levels on your Apple's screen. The number 
of grey levels may be changed with one keystroke. The 
intensity and contrast of the image are controllable via 
game paddles. Also supplied is software tor image 
contouring for those interested in movement detection 
or graphic design applications. 



The Dithertizer II package Is available ready 
to run with camera, Interface card and 
the software described above for only: 

Dithertizer II Interface card 
and software (without camera): 



$650. 
$300. 



Computer Station 

11610 Page Service Dr. 

St. Louis, MO 63141 

(314)432-7019 

Apple II is a registered trademark of Apple Computer, Inc. 
Ditherthizer II is a trademark of Comouter Station, Inc. 




ON TOP 



Organize your business with 
accounting software from SBCS: 
V^L*ml • General Ledger 

- Accounts Receivable 
Accounts Payable 

The above programs can be used alone or inte- 
grated. They include extensive error checking 
and data entry prompting, numerous reports, 
departmentalizing, and budgeting. Detailed doc- 
umentation included. 

Get on top of things! Call or write today. 
SMALL BUSINESS COMPUTER SYSTEMS 

4140 Greenwood, Lincoln, NE 68504 (402) 467-1878 



.Decision 

Qyatems 



Decision Systems 

P.O. Box 13006 
Demon. TX 76203 



SOFTWARE FOR THE APPLE II* 

ISAM DS is an integrated set ol Applesolt routines that gives indexed file capabilities 
to your BASIC programs. Retiieve by key. partial key or sequentially. Space Irom 
deleted records is automatically reused Capabilities and performance that match 
products costing twice as much. 
$50 Disk, Applesoft. 

PBASIC-DS is a sophisticated preprocessoi for structured BASIC. Use advanced 
logic constructs such as IF ELSE. ... CASE. SELECT, and many more. Develop 
programs for Integer or Applesoft. Enjoy the power of structured logic at a fraction of 
the cost of PASCAL 
$35. Disk. Applesoft I48K. ROM or Language Card! 

DSA-DS is a dis-assembler for 6502 code. Now you can easily disassemble any 
machine language program for the Apple and use the disassembled code directly as 
input to your assembler Disassembles instructions and data. Produces code com 
palible with the S-C Assembler (version 4 Ol. Apple's Toolkit assembler and others. 
525 Disk, Applesoft (32K. ROM or Language Card) 

FORM-DS is a complete system lor the definition of input and output froms. FORM 
DS supplies the automatic checking of numeric input -for acceptable range of values, 
automatic formatting of numeric output, and many more features 
$25 Disk. Applesoft I32K. ROM or Language Cardl 

UTIL-DS is a set ol routines for use with Applesolt to format numeric output, selec 
lively dear variables lApplesolis CLEAR gets everything), improve error handling. 
and interface machine language with Applesoft programs Includes a special load 
routine lor placing machine language routines underneath Applesolt programs 
$25 Disk. Applesolt 

SPEED-OS is a routine to modity the statement linkage in an Applesoft program to 
speed its execution improvements of 5-20% are common. As a bonus. SPEED-DS 
includes machine language routines to speed string handling and reduce the need fc 
garbage clean up. Author LeeMeador 
$15 Oisk, Applesolt (32K. ROM oi Language Cardl 



I Add MOO lor Foreign Mail) 
"Apple II is a registered trademerk of the Apple Computer Co 



Newman, John, "A Kansas City Standard Tape Dump," 
pg. 9-16. 

A utility for the SYM-1. 
Anon., "A Wide Screen Hex/ ASCII Memory Dump," 
pg. 22-25. 

An easily relocatable memory dump utility for the 

SYM-1. 

1130. SoftSide 3, No. 4 (January, 1981) 

Pelczarski, Mark, "Developing Data Base — Part Five," 
pg. 16-18. 

More on the search routine for this utility for the 

Atari, the Apple II and the TRS-80. 
Edmunds, William, "Computer Space," pg. 40-41. 

A game for the Apple. 
Morris, William, "Fugue," pg. 74-76. 

A music program for the Atari. 
Truckenbrod, Joan, "Computer Graphics," pg. 83-84. 

Tutorial with demo example for Apple Hi-Res. 



1131. Abacus n 3, Issue 2 (February, 1981J 

Freeman, Larry, "DOS Type," pg. 2-5. 

A routine to identify the type of DOS and disk type 

active in your Apple. 
Zirak, Victor, "ASCII Memory Dump," pg. 8. 

View the contents of the Apple's RAM memory with 

this routine. 
Davis, James P., "M.E.C.A. —An Expanded Menu," pg. 9. 

A menu program for the Apple disk. 
Yee, David R., "Long Division," pg. 16. 

An extended precision long division routine for the 

Apple. 

1132. The G.R.A.P.E. Vine 2, No. 2 (March, 1981) 

Lawson, Steve, "G.R.A.P.E. Font Converter," pg. 7. 

A program for the Apple to convert a standard size font 

into a large size font. 
Ude, Art, "Conversion of Biblical Measures," pg. 8-9. 

Cubits to metric units. 

1133. Stems from A.P.P.L.E. 4, Issue 3 (March, 1981) 

Wittke, Walton L., "Look," pg. 4. 

An Applewriter utility that lists the catalog and lists 
the first 12 lines of a designated text file. 

Ward, Dennis, "DOS 3.3 Tool Kit Assembler Hints," 

pg. 7. 

How to get the most out of the Tool Kit assembler on 

the Apple. 
Ward, Dennis, "Professional Hi-Res Made Easy," pg. 7. 
Some hints for using the Tool Kit to modify an Apple 
graphics page. 

1134. The Michigan Apple-Gram 3, No. 3 (March, 1981) 

Anon., "Apple II Mini-Assembler F666G," pg. 12-13. 
A short tutorial on the Apple monitor's mini- 
assembler. 

Anon., "LAC Apnote: Tabbing with Apple Peripherals," 

pg. 13-14. 

This driver allows the user to tab normally without 
substituting POKE 36,X for TAB(x). 

Zager, Bill, "Apple Concordance Revisited," pg. 27-28. 
An Apple utility to print out a list of a BASIC 
program's variables. 
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1135. The Harvest 2, No. 8 (April, 1981) 

Andersen, Chuck, "Diskette Nibblizing," pg. 11-12. 
A tutorial on how data is stored on the Apple disk. 

Thompson, C.J., "NIFFUM — A DOS 3.3 to 3.2 Con- 
verter," pg. 19-20. 
A utility for the Apple disk system. 

1136. Washington Apple Pi 3, No. 3 (March, 1981) 

Neuman, David, "CP/M for the Apple," pg. 10-16. 

A general description of the CP/M for Apple. 
Decker, R.J., "More Tips of the MX-80," pg. 22. 

Notes on horizontal tabbing on the Epson MX-80 

printer. 

1137. Personal Computing 5, No. 4 (April, 1981) 

Gilder, Jules H., "How to Boot Binary Programs," pg. 56-57. 
Use a binary program as your Apple disk Hello. 

1138. Creative Computing 7, No. 4 (April, 1981) 

Parr, James, "Apple as Time-Sharing User," pg. 60-65. 

A helping hand into the world of time-sharing for 

Apple users. 
Jacobs, Jake, "Landing Simulator," pg. 156-166. 

Using the Apple as a landing simulator for aircraft. 

1139. Radio Electronics 52, No. 5 (May, 1981) 

Hyypia, Jorma, "Learning about Microprocessors," pg. 
45-48. 

Discussion of the SYM-1 as a learning aid. 
Gupton, James A., Jr., "Computer Control for the 
Unicorn- 1 Robot," pg. 53-55. 

The use of the KIM-1 and SYM-1 for robot control is 

discussed. 

1140. MICRO, No. 35 (April, 1981) 

Rhodes, Ned W., "S-C Assembler Modifications," pg. 7-10. 
Adding back the multiply routine; automatic line 
numbering; etc. 

Kovacs, Bob, "Memsearch for the AIM 65," pg. 17-20. 
A machine language routine which can scan memory 
for a user-specified sequence. Includes a wild-card 
feature. 

Orton, Ralph, "SYM Time-Remaining Timer," pg. 37-39. 
This SYM program measures elapsed time and sounds 
an alarm. 

Campbell, Gordon A., "Oh No — It's Garbage 
Collect!", pg. 43. 

All about garbage collection (memory management) 

on the 6502 and how to avoid those long delays. 
Sogge, Glenn R., "Integer BASIC Internals," pg. 65-66. 

A sorted list of Apple Integer BASIC memory locations 

and routines. 

1141. AppleGram 3, No. 3 (March, 1981) 

Sander-Cederlof, Bob, "Cryptogram Solver," pg. 8-10. 
A short routine for the Apple to help with decoding 
those cryptograms in the Sunday paper. 

Wiggington, Randy, "Fast Garbage Collection," pg. 21-25. 
A rapid garbage collector program which reconstructs 
string memory, rapidly cutting down the length of 
those times when your Apple program just seems to die. 

Sander-Cederlof, Bob, "Modify DOS Commands," pg. 

29-30. 

A utility for the Apple which changes the DOS com- 
mands and updates the DOS on your disk. 




A 

Wooden 

Computer? 



Not from Commodore! 

So why should the desk look like wood? A pleasant 
cream and charcoal trimmed desk looks so much better 
with Commodore systems. One look and you'll see. 
Interlink desks are right. By design. 

The specifications only confirm the obvious: 



•Cream and charcoal 
color beautifully matches 
the Commodore hardware 
and blends with your 
decor. 

•An ideal 710 mm (28") 
keyboard height yet no 
bumping knees because a 
clever cutout recesses the 
computer into the desk- 
top. 

• High pressure laminate 
on both sides of a solid 
core for lasting beauty 
and strength. 

• Electrostatically applied 
baked enamel finish on 
welded steel legs— no 
cheap lacquer job here. 



•T-molding and rounded 
corners make a handsome 
finish on a durable edge 
that won't chip. 
•Knocked down for safe, 
inexpensive shipment. 
•Patented slip joints for 
quick easy assembly. 
•Leveling glides for 
uneven floors. 
•Room enough for a 
Commodore printer on the 
desk, yet fits into nearly 
any den or office niche— 
H: 660 mm (26") W: 1170 
mm (46") D: 660 mm (26"). 
•Matching printer stand 
available with slot for 
bottom feeding. 



PRICE: $299 

In short, as Commodore dealers, we won't settle for 
anything that looks good only in the catalog! Our 
customers won't let us. They don't buy pictures. And 
neither should you. This is why we will let you use one of 
our desks for a week and then decide. If for any reason 
you don't like it, just return It in good condition for a 
cheerful refund. 



-, 



If your Commodore dealer doesn't carry our desks yet, 
send a check for $299 and we will ship your desk freight 
paid! 

Name 

Address 

City St Zip 



Interlink, Inc., Box 134, Berrien Springs, Ml 49103 
Master Charge and Visa welcome. Call our order line: 
616-473-3103 
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CRAE 2.0 - A fast coresident Applesoft Editor for Applesoft 
Programmers. Now perform global changes & finds to anything 
in your Applesoft program. Quote (copy) a range of lines from 
one part of your program to another. A fully optimized stop 
list command that lists your program to the screen with no 
spaces added and forty columns wide. Append Applesoft 
programs on disk to program in memory. Formatted mem- 
ory dump to aid debugging. Powerful renumber is five times 
faster than most available renumber routines. Auto line num- 
bering. Crae need be loaded only once and changes your 
Applesoft program right in memory. 48K APPLE II or PLUS 
& Applesoft Rom 8. Disk. 
CRAE on disk with 20 page manual ws.so 

MCAT 2.0 - MCAT 2.0 is a fast binary utility which creates 
a sorted master catalog which is saved on disk as a binary file 
(Fast). The master catalog can be easily updated a whole disk- 
ette at a time (Add, Delete. Replace). List/Print have global 
search capability and one or two columns. Provisions for dup- 
licate volume numbers. Approximately 1200 file names.. 48K 
or 32K. 13 or 16 sectors DOS supported. 

MCAT on disk with 10 page manual S«.9& 

CRAE and MCAT on one disk $59.95 with manuals 

EROM HI - Requires Applesoft ROM & ROMPLUS. CRAE'S 
powerful Global change/find, optimizes List Command. Hex 
to Decimal and Decimal to Hex conversion now available on a 
2716 EPROM. *„«.- 

EROM #1 with manual $49.95 

EROM #2 - (Requires Applesoft ROM and Romplus) CRAE's 

Autoline numbering, formatted memory Dump. Append. 

Number conversion (Hex/Dec) on one 2716 EPROM. 

EROM #2 with manual $34.95 

EROM #3 — CRAE'S powerful Renumber and Quote function 

now on two 2716 EPROMS. 

EROM #3 with manual $34.95 

EROM 1. 2. 3 $99.95 

Note: All Eproms are compatible with P.L.E. 
Note: Append only requires 48K and DOS. 

OLDORF'S REVENGE - OLDORF is a well done andexcitingi 
Hl-Res game using over 100 HI Res pictures. OLDORF re- 
quires 48K. Applesoft Rom. and Disk. As you explore thai 
caverns and castles (each locale is done in Hl-Res) looking for" 
treasure, you must battle the one-eyed, two thumbed torkie; 
find the grezzerlips' sword; visit the snotgurgle's palace and get 
through the domain of the three nosed ickyup - Plus MORE! 
OLDORF on disk $19.95 

TARTURIAN - The TARTURIAN requires 48K RAM Apple- 
soft ROM, and disk. As you explore the 160 rooms (each done 
in Hl-Res) gathering weapons and treasure that will prepare 
you for the final battle against the TARTURIAN, you will 
enconter deadly KROLLS, battle the MINOTAUR, decipher 
the YUMMY YAKKY'S secret, make friends with the TULIE- 
SWEEP. avoid GHOULS, explore the PILLAR tombs, discover 
secret passages and more. 5 interlocking programs. 
TARTURIAN on disk $24.95 

CREATURE VENTURE — You have just inherited your 
Uncle Stashbuck's mansion but first you must rid it of the 
horrible creatures that have taken it over and find your uncle's 
buried treasure. 

Directing the computer with two word commands such as 
'Go North', 'Get Key', 'Look Room', 'Punchout 8oogeyman' 
etc. you will need to explore deep into the mansion to finally 
find theStashbuck fortune. 

There are tons of High Resolution graphics plus some clever 
animation just for fun. Required 48K Ram, Applesoft Rom 
and disk. All High Resolution characters generated with 
Higher Graphics II by Robert Clardy. 
CREATURE VENTURE on disk 



$24.95 



See Your Local Dealer or Send Checks to 

HIGHLANDS COMPUTER SERVICES 

14422 S.E. 132nd ■ Renton, WA 98056 * (206)228-6691 

Washington residents add 5.4% sales tax. Applesoft and Apple 

are registered trademarks of Apple Computers, Inc. 

ROMPLUS is a trademark of Mountain Computers, Inc. 

(Dealer inquiries invited) VISA. MasterCharge, C.O.D. 



1142. The C.I.D.E.R. Press 3, No. 2 (March/ April, 1981) 

Lingwood, David A., "Word Processor Evaluation 
Guide," pg. 3-6. 

A review of features to look for in selecting a word 

processor for the Apple. 
Greene, Amos, "Catalog Interrupt," pg. 9. 

A utility for the Apple which permits listing only a 

portion of the catalog. 

1143. Softalk 1, No. 8 (April, 1981) 

Wagner, Roger, "Assembly Lines," pg. 25-28. 

The latest installment in this continuing series deals 
with the various addressing modes for the 6502 micro- 
processor. 

1144. The Michigan Apple-Gram 3, No. 3 (April, 1981) 

Tuttleman, Roger, "Text File Reader," pg. 2. 

An Apple utility to look at sequential text files. 
Zager, Bill, "Printing Mail Power Data on Two-Column 
Labels," pg. 4-5. 

Printing labels two across using the Apple. 

1145. Dr. Dobb's Journal 6, Issue 4, No. 54 (April, 1981) 

Harris, David C, "Important Features of the PCNET 

Protocol," pg. 47-52. 
A protocol for data communications is being devel- 
oped so that micros such as the PET and Apple can 
communicate with most mainframe computers using 
a universal system. 

1146. Call — A.P.P.L.E. 4, No. 3 (March/ April, 1981) 

Rosing, Mike and McLauren, Keith, "Pascal Internals," 
Pg-9-21. 

A primer in several parts: booting process; I/O 

routines; Pascal directory; 6502 machine code and 

p-code; and two appendices on location of machine 

registers and source code for a disassembler. 
Manly, Ken, "Keeping Up to Date," pg. 49-54. 

An Apple utility to make EXEC file backups of BASIC 

programs in development. 
Hendel, David, "ROM Mover," pg. 53-54. 

An Apple utility for moving the F8 ROM to the DO 

socket. 
Golding, Val J., "Data Statement Writer," pg. 58. 

A utility for the Apple. 
Hartley, Tim, "Programs to Modify VTOC (DOS3.3)," 
pg. 63. 

Routines to show tracks 30-34 in use and to show 

tracks 30-34 as completely free. 

1147. Applesauce Vol. 2, No. 3 (January/February, 1981) 

)ordan, Tricia, "Easy or Pie," pg. 3-8. 

Experiences with two Apple word-processing systems. 
Hyde, Randy, "LISA'S Internal Structure and Custom- 
ization," pg. 10-12. 
How to modify the LISA assembler so that special pur- 
pose functions may be included. 

Mazur, Jeff, "Coping with Apple's High Speed Serial 
Card: Part I," pg. 24. 
Adding handshaking to the High Speed card. 

1148. The Seed 3, No. 4 (April, 1981) 

Wheeler, Steve, "Ted II Modifications," pg. 8-10. 
Add four new pseudo-operations to the Ted II Editor/ 
Assembler. 



A 
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1149. Apple-Dayton Newsletter 2, No. 4 (April, 1981) 

Fox, Dan, "Flies in the Ointment — Bug Found in Apple 
Renumber," pg. 8. 

A problem to watch for in the renumber routine. 

1150. Southeastern Software Newsletter Issue No. 25 
(April, 1981) 

Hartley, Tim, "The Muffin Fix," pg. 7-8. 

Modification of VTOC so that Muffin would think 
that disk tracks 32-34 are in use. 

1151. The Apple Peel 3, No. 4 (April, 1981) 

Hill, Alan G., "Amper-Reader," pg. 7. 
A utility for the Apple. 

1152. SoftSide 3, No. 7 (April, 1981) 

Truckenbrod, loan, "Computer Graphics," pg. 26-28. 

Perspective drawing on computers such as the Apple. 
Morris, William and Cope, )ohn, "Convoy," pg. 34-39. 

A game for the Atari. 

Summers, Murray, "Applesoft Chaining," pg. 54-55. 

A tutorial for the Apple with 3 demo listings. 
Voskuil, Jon, "Math Decathlon," pg. 66-68. 

This second article for Apple users adds two more 

events. 

1153. Compute! 3, No. 4, Issue 11 (April, 1981) 

Thornburg, David D., "The Commodore VIC-20: A 
First Look," pg. 26-33. 

AH about the new Commodore color computer. 
Butterfield, Jim, "How to be a VIC Expert," pg. 34. 

Advice to PET owners and a demo listing for the new 

VIC. 
Keck, Rick, "Basically Useful BASIC," pg. 36. 

An ascending/descending sort routine for the 6502 

micros. 

JMCftO 



Statement of ownership, management, etc., required 
by the act of Congress of October 23, 1962 of MICRO 
published monthly at Chelmsford, Massachusetts for 
November 1981. 

The name and address of the publisher is MICRO INK, 
Inc., 34 Chelmsford Street, Chelmsford, Massachusetts. 
The Editor/ Publisher is Robert M. Tripp of Chelmsford, 
Massachusetts. 

The owner is MICRO INK, Inc., Chelmsford, Massa- 
chusetts and the names and addresses of stockholders 
owning or holding one percent or more of the total amount 
of stock are: Robert M. Tripp and Donna M. Tripp of 
Chelmsford, Massachusetts. 

The known bondholders, mortgagees and other security 
holders owning one percent or more of the total amount of 
bonds, mortgages or other securities are: none. 

The average number of copies of each issue of this 
publication sold or distributed through the mails or other- 
wise to paid subscribers during the twelve months pre- 
ceding the date shown above is: 13,360. 

I certify that the statements made by me above are cor- 
rect and complete. 

Signed: Robert M. Tripp 
Editor/Publisher 



"INSTANT PASCAL" 
AIM-65 SYSTEM 



Employing "Instant Pascal" (A65-PS) on 
the AIM-65 requires the use of an expan- 
sion board for 4 of the 5 ROM's provided in 
the set. 

EXCERT is offering assembled and tested 
systems with 20K RAM, warranteed for 6 
months, that use either the BANKER™ 
Board (MEB3-2A) from Micro Technology 
Unlimited or the DRAM PLUS™ Board 
(MEB1-2A) from the Computerist and are 
rofa//y enclosed within the Enclosure's 
Group case including the power supply 
(ENC3A), but excepting the interconnec- 
ting cable (CBL1 or CBL3). These systems 
include the following EXCERT Part 
Numbers: 



"INSTANT" SYSTEM I 
PIN: CSA65 - 4 PS - 3A/1-2A 

A65-4 $469 

A65-PS 100 

ENC3A 130 

— DRAM PLUS™ — 
MEB1-2A 325 

CBL1 25 



"INSTANT" SYSTEM III 
P/N: CSA65 - 4PS - 3A/3-2A 

A65-4 $469 

A65-PS 100 

ENC3A 130 

— BANKER™BD. — 
MEB3-2A 265 

CBL3 25 



Total System Cost $1049 Total System Cost ..$989 

Rockwell's recommended system using 
RM65 boards assembled in the Don-El 
large enclosure would cost nearly $1400 
(suggested retail). 

Call or write for complete list of AIM-65 
Products and Accessories or other Custom 
AIM-65 Systems. 



NEW PRODUCTS! 

CUBIT featuring a 4'/ 2 x6'/j AIM-65" tot $195 
"less monitor, printer, display & keyed 

APPLIED BUSINESS COMPUTER featuring 
64K RAM Board - $495 
80 column Video Controller - $325 
5'/- " Disk Controller w/ADOS' M ■ $485 



Educational Computer Division 
EXCERT INCORPORATED 



SALES 
SERVICE 
INSTALLATION 
CONSULTING 



P.O. Box 8600 

White Bear Lake, MN 55110 

(612)426-4114 
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/Iduanced/; 

X-tended 
Editor 



The Advanced X-tended Editor (AXE) is a professional programming aid 
which provides the user with a "text-editor" style extension to the 
standard Applesoft* operation system. Operation alongside DOS, Monitor 
and Applesoft, AXE remains transparent to the user until called upon by 
one of over thirty commands. 

• Global search & replacement, including wildcards, 
selected changes, & line number references. 

• Full character insert, gobble & delete. 

• Full statement insert & delete 

• Enhanced cursor movement including search 
ahead & position. 

• Two packed list edit modes. 

• Recall editing modes. 

• User programmable keyboard macros. 

• Four LIST formats, including unique BREAK LIST 
format for easier reading, understanding, & editing 
of code. 

• Auto line-numbering. 

• Lower case character entry. 

• Resident BASIC program may be run at any time. 

• Many more features. 

• Develop programs quicker & easier, saving hours of 
programming cost. 

• Requirements: 
Apple 11/11+,* Applesoft, 
DOS 3.3, 48K Ram 

Commands are easy, logical, and operate in the normal Applesoft entry 
mode, or in AXE's editing modes. AXE operates on BASIC code as stored 
in memory by Applesoft. No conversions of code to text is required. In 
addition, all Apple II DOS and Monitor commands are left fully functional. 

/tdusnced X-tended Editor 



Available at your local dealer 
An invaluable tool at only $69.95 




% 



t 



•Apple II/II+. and Applesoft 
are registered trademarks 
of Apple Computer, Inc. 




Uersa Compuiingjnc 

3541 Old Conejo Road, Suite 104 
Newbury Park, CA. 91320 (805)498-1956 
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Aardvark Technical Services 52 

Abacus Software 120 

Advanced Operating Systems IBC 

Adventure International 1 

Andromeda, Inc 24, 84 

Applied Electronic Components, Inc 20 

Astar International Co 44 

Aurora Software Associates 55 

Beagle Brothers Micro Software 62 

Beta Computer Devices 116 

Broderbund Software 103 

CALL A.P.P.L.E 40 

Columbus Instruments 65 

CompuTech 94 

Computer Advanced Ideas 63 

Computer Case Co 113 

The Computerist, Inc 36 

Computer Mail Order 26 

Computer Station 121 

Computer Trader 1 1 
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Datamost 4 r 6, 94 

Data Resources Corp 67 

Data Transforms 70 
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Engineering Micro Software Center 114 
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Galfo Systems 62 

Gimix, Inc 13 
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Huntington Computing BC 

Innovative Design Software, Inc 45 

Interlink, Inc 123 

Jini Micro Systems 16 
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Lazer Micro Systems, Inc 12, 118 
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Logical Software, Inc 100 
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Micro Business World 25 
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MICRO INK, Inc 54 
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Microsoft Consumer Products IFC, 19 

Micro-Ware Distributing, Inc 103 

Mittendorf Engineering 51 

Modular Media 105 

Modular Systems 113 

Money Disk 100 

Mountain Computer 7 

Muse Software 108 

Nibble 66 

Nikrom Technical Products 120 

Olympic Sales Co ill 

Omegasoft 100 

Omega Microware 42,97 

Orion Software 62 

Pegasys Systems 102 

Percom Data Co., Inc 48 

Perry Peripherals 50 

The Place Where You Go To Buy Computers, Inc 30 

Pretzelland Software 81 

Programmer Newsletter ng 

Progressive Computing 23 

Real Soft 99 

Rehnke Software 114 

Renaissance Technology Corp 59 

f . Rosenberg 34 

Rosen Grandon Associates HI 

Scelbi Publications 94 

Sensible Software 92 

Sirius Software 71-78 

Skyles Electric Works 17, 60, 93 

Small Business Computer Systems 122 

Smoke Signal Broadcasting 41 

Soft CTRL Systems 47 

Software Sorcery, Inc 44 

SounDustrial Electronics, Inc 65 

Southeastern Software 33 

Southwestern Data Systems 61 

Stellation Two 42 

Sublogic Communications 56 

Sunset Electronics 55 

Synergistic Software 8, 115 

Systems International 83 

Versa Computing 95, 126 

Wesper Micro Systems 2 

Western New York Microcomputer, Inc 29 



The only 
thing you can 
do with a 
baked Apple 
is eat it. 

"Apple II is a trademark of Apple Computer, Inc. 



The more you stuff your Apple II™ with plug-in 
boards, the more of a chance it has to overheat. 

And once that happens, it won't do anybody any 

good. Your program bombs and you start losing 

time and money. 

The solution? Simple. Take two minutes to install 
the Dana Industries fan in the back of your Apple, 
and you'll practically never have to 
worry about overheating again. 

So pick up the Dana Industries 
fan at your local 
computer store. 
And your Apple 
will have a longand 
fruitful life. 




Next Month in MICRO 



Pascal Feature 

• Elementary Pascal Internals — An 

introduction to the internal structure of the 
P-machine and to some of the concepts 
which underlie the workings of P-code 
Pascal implementations. 



Pascal Textflle Lister — This utility will 
improve the appearance of your listings by 
separating them into pages with headings. 



RELOC — Allows the Apple Pascal text 
editor to be used with DOS 3.3 to more 
easily edit BASIC text files. 



Pascal Tutorial, Part 3 — Last article in 
our series to help you understand UCSD and 
Pascal. 



Other Features 

Shape Manipulate Program — This Applesoft 
program lets you create a shape table, delete 
shapes, add shapes from other tables, or 
change the maximum number of shapes in a 

table. 

Experimentation and the TRS-80C Color 
Computer — A summary of the normal 
capabilities of the TRS-80 Color Computer, and 
the unit's I/O capability. 

An I/O Expansion for the AIM — This article 
describes a method of adding two more V.I.A.s 
to the AIM to triple the capacity of its 
input/output control hardware. 

Scrolling List Program — Scroll forwards or 
backwards through a listing to view any part of 
a BASIC program without requiring a series of 
keyed LIST commands. 



0. i 



40% OFF 



More MICRO for Less Money When 
When You Subscribe, until December 31st 



Your money goes farther when you sub- 
scribe. During the course of a year, when you 
subscribe, you save 40% (in the U.S.). 

Pay only $18.00 ($1.50 a copy) for 12 monthly 
issues of MICRO sent directly to your home or 
office in the U.S. 



But on the newsstand — if you can locate the 
issue you want — you pay $30.00 a year ($2.50 
a copy). 

Save 40% and make sure you get every issue. 
Subscribe to MICRO today. 



MICRO 

34 Chelmsford Street 
P.O. Box 6502 
Chelmsford, MA 01824 

Please send me MICRO for _ 1 year _ 2 years 
NOTE: Airmail subscriptions accepted for 1 year only. 



S ubscription Rates Effective January 1, 1982 
Country Rate 

United States 



Check enclosed $_ 
Charge my 



VISA account 
Mastercard account 



No. 



Foreign surface mail 

Europe (air) 

Mexico, Central America, Mid East, 

N. & C. Africa 
South Am., S. Afr., Far East, 

Australasia, New Zealand 



$24.00 1 yr. 
42.00 2 yr. 
27.00 
42.00 

48.00 

72.00 



Expiration date 
Name 



* Airmail subscriptions accepted for only 1 year. 
For U.S. and Canadian 2-year rates, multiply by 2. 



Address 



City/State . 



Job Title: 



.Zip Type of Business/Industry: 



% 
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MANUAL 
DEXTERITY 




h The very popular Mostly 

Basic book teaches users 

introductory programming 

techniques while providing a 

myriad of useful applications 

for the home and business. 

Advanced Operating Systems 

has compiled these programs 

and grouped them into 3 

sections. Buy any or all 

sections as you need them. 

Each section is available on 

cassettes for *TRS-80 Models I 

and III, and on diskettes for 

°Apple Computers. 

HOUSEHOLD: Digital 

Stopwatch ■ The House 

Buying Guide ■ Amortization 

Schedule ■ Electric Energy 

Usage* Medical Expense 

Record • Recipe Amount 

Calculator ■ The Basic Diet ■ 

Message Taker ■ Gas Mileage 



Calculator ■ The Tarot Card 

Reader Game. 

EDUCATIONAL: The 

Dungeon of Htan ■ Language 

Flash Cards- Memory 

Challenger- Visual Perception 

Test ■ Math 4 ■ The Reading 

Pacer • Spelling Test. 

SCIENTIFIC: Basic Telephone 

Dialer ■ Combination Lock ■ 

The Time Machine ■ The Word 

Board -Constellation 10 -The 

Sun • Digital Dice ■ Hex to 

Decimal and Decimal to Hex 

Conversion. 

The MOSTLY BASIC series 

from Advanced Operating 

Systems is now available at 

your local software retailer, or 

calM -800-348-8558 for the 

nearest dealer. 



ADVANCED 

OPERATING 

SYSTEMS 

450 St. John Road 

Michigan City, Ind. 46360 

219 879-4693 



Trademark of Tandy Corp Trddemaifc of Apple Computer. Inc 

















HUNTINGTON COMPUTING ^ 



ONE OF THE WORLDS LARGEST INVENTORIES 



VisiCalc ust 5200.00 now 

VisiFJIe usi S250.00 now 

Horriblescope (Disk) ust sis.oo 



$149.00 
$199.00 
$3.99 




now 



MISCELLANEOUS 
Escape Irom Acturus S29 95 

Basic Mailer S69 95 

Memory Managemeni II S49.95 

Caslle Wollenslein S29 95 

Upper Reaches ol Apshai S19.95 

Bridge Tulor S39.95 

PASCAL Animation Tools 

Hand Holding BASIC 

UT-100 Emulator 



Space Quark 

Beneath Apple DOS Ibook) 

Birth ot the Phoenix 

Goblins 

Painter Power 

US Constitution 

Merger 

Super Stellar Trek 

LISA 

V-Plol (Yuccipa) 

V-Slat 

V-Pnnl 

Bram Surgeon 

Into Master 

Waterloo II 

Fantysland2U41 

Torpedo Terror 

Speedslar 

Kaves ot Karkhan 

Dos Boss 

Memorex Disks 

Verbatim Datalile-piain w/hubs 

Dysans 

Fiipson Box 

Scotch Disk Cleaner 

AtanVTRS-80-'Pef 



S29 95 
S19 95 
SI4 95 

. .S27.S0 
S39 95 
S29 95 
$49 95 
S39.95 
S79.95 
S29 9S 
S29 95 
529.95 
S49 95 

S150 00 
S49 95 
S59 9S 
S24 95 

SI39 95 
S49.95 
524.00 



S2995 
Writ* lor 



no« $15.3* 
no. $S».4* 
no. $42.19 
no. S1J.3* 
no. $14.4* 
no. $35.1* 

$45.** 

$34.** 

$45.** 

no. $25.3* 
no. $14.4* 
no. $11.4* 
no. $13.1* 
no. $33.4* 
no. $15.1* 
no. $41.4* 
no. $11.8* 
no. $47.8* 
no. $15.3* 
no. $15.3* 
no. $15.3* 
... $41-4* 
no. $117.4* 
no. $41.3* 
no. $54.** 

no. $11.1* 
no. $114.4* 
no. $41.1* 

no. $10.3* 
10 for $14.9* 
10 for $17.** 
10 for $41.9* 
$19.(0 
no. $14.** 
Information 




Sneakers 

Copts & Robbers 

Pot-0-Gold I 

Pot-0-Gold II 

Ring ol Saturn 

Streets ol Ihe City & Trucker 

President Elect . . 

Dis-oDoc 

Med Fly Mania 

Hungry Boy 

Anova 

Solitaire 

The Source 

Race lor Midnight 

Hi-Res Secrets 

Banners I 

Complete Graphics (Tablet) 

Special Etlecls (Tablet) 

Inkwell Apple * III 

Snack Attack 

V-Plol 

Disasem/65 

The Inspector (Disk or Prom) 

The Book 

Don I (Book) 

Using 6502 Assembly Language 

Expandapon 

Firebird 

Thiel 

Threshold 

Target Planner 

Paddle- Adapple 

So Cal Research 

Word Handler 



NEW PROGRAMS 

529 25 i 



.534.95 no. 

S39.95 no. 

S39.9S no. 

539 95 no. 

S24 95 no. 

539 95j:o» 

$72 39 no. 

$29 95 no. 

S24 95 no. 

S74 95 no. 

$29.95 no. 
5100 00 no. 

529 95 no. 
S125.00 no. 

S34 95 no. 
S119 95 no. 

S69 95 no. 
SISOOOno. 

$29 95 no. 

S29 95 no. 

.529.95 no. 

S49 95 no. 

.519.95 no. 

SB 95 no. 

S19 95 no. 

559 95 no. 

$29 95 no. 

S29 95 no. 

S23 97 no. 
SI95 00 no. 
.529.95 no. 

$14.95 no. 
$250 00 no. 



$15.1* 

$1».4» 

$33.4* 

$33.4* 

$JJJ 

$21. 

*33J 

$41.4* 

$14.3* 

$21.1* 

*•»• 

$25. 



GAMES 
Hi-Res Soccer 

Apple* -Oids 

Wurst ot Huntington Computing . 

Gobbler 

Ultima 

Autobahn 

8altle Cruiser Action 

Gorgon 

Super Slellar Trek 

Helllire Warrior 

Gamma Goblins 

Mission Asteroid 

Wizardry 

Star Mines 

Warp Factor ... 



S29 95 no. 
S29 95no. 

S24.95no» 
539.95 no. 
S29 95 no. 
$44 95 no. 
S39 95 no. 
$39 95 no. 
$39 95 no. 
.529.95 no. 
S19 95 no. 
S49 95 no. 
.529.95 no. 
$39 95 no. 



$25.39 
$15.39 
$19.** 
$21.1* 
$33.4* 
$15.3* 
$34.49 
$33.49 
$33.4* 
$33.** 
$15.3* 
$17.** 
$41.4* 
$15.3* 
$13.** 



Read Softalk's review 

on page 87 of the 

October issue 

$19.99 



Microsoft Adventure 

Wizard and the Princess 

Flight Simulator 

Odyssey 

Sargon II 

Space Eggs 

Hi-Res Cribbage 

Lords of Karma (cass 

Oh Shool 

ABM 

Computer Conflict . 

Computer Air Combat 

Temple of Apshai 

Zork 

All Nibble Software . 

Robot Wars 

Cranston Manor 

Dragon s Eye 

Computer Acquire 

Twala s Lasl Redoubt 

Alien Ram 

Alien Typhoon 

Raster Blaster 

3-D Skiing 

Creature Venture 

Galaxy Space War I 

Meteoroids m Space 

Dragon Ftre 

Pool I 5 



GAMES 



=29 95 no. 
S32 95 no. 
S34.95 no. 
S29.95 no. 
S34 95 no. 
$29 95 no. 
$24.95 no. 
.520.00 no. 

no. 

S24.95 no. 

$39.95 no. 
$59 95 now 
.539.95 no. 

. . .53995 



" 

"8 

Jl 

$2s.i» m 

104.19 WA 

$1*.4» -J" 

$1*1.8* ^ 

$4..7» 1.1 

$130.4* ™ 

$23.39 WA 

$25.3* "J 

$42.3* £l 

$I1.*T —} 

$4.45 ■ 

$14.8* Wl 

$30.8* WA 

*-*■ -14. --^ 
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$25.39 
$25.3* 
$24.38 

$145.4* 
$24.8* 
$13.45 

$212.4* 



.539.95 no. 
S34 95 no. 
524 95 no. 
S20 00 no. 
S29 S5 now 
$24 95 now 
S24 95 now 
$29.95 now 
$24 95 no. 

S24.95 no. 

$39.95 now 
519 95 m.. 
S49 95 no. 
534 95 no. 



$25.3* 
$28.9* 
$29.49 
$13.3* 
$2*.4* 
$25.1* 
$21.1* 
$14.** 
$1*.** 
$21.1* 
$35.** 

$sa. 

$33. 
$33.** 
15% m 

$33. 

$1*. 

$21. 

$14. 

$25.1* 

$21.1* 

$21.1* 

$25.1* 

$21.1* 

$21.1* 

$33. 

$14. 

$42.4* 

$2*.4* 



List S285.00 now 



NEC Green Screen Monitor 

Zenith Green Screen Monitor Lists. 59.00 

Ulysses ust S34.95 

Speed/asm ust £39.95 

Lisa 2.5 usts79.95 

Dinosaurs ust sis.oo 



$199.00 
$109.00 
w $29.69 
w $33.89 
w $67.89 
$12.69 



Apple 



® 



BMP Joystick 

Here's a joytsick you won't 
want to be without. It's the only 
joystick we know about that al- 
lows you to change the axis 
with a flip of a switch. Only the 
highest quality parts are used. 

A real bargain at 

$49.95 



t 



SO 

i3.»» mi 

H Hal WA 
13.** &■ 

~a 
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ORDER BY PHONE U 

800-344-4 1 1 1 (outside Calif.) 
800-692-4143 (inside Calif.) 

209-992-54 1 1 (foreign or local) 

Apple is a registered trademark of Appte Computer Inc 



Post Office Box 787 
Corcoran, California 9321 2 




Corcoran, California 93212 /m Wk extra send (or fraecaiaiog. Prices subject io Wi 

VB DP change £0 



We take MasterCard. VISA or American Ex- 
press (Include card # and expiration date) 
California residents add 6% tax. Include 
S2.00 lor postage Foreign and hardware 
extra 
change 



a 

m> 



